Perl đang làm gì với lập luận này để thúc đẩy trong trường hợp này?

Question

Tôi chỉ thấy một số mã trong cơ sở mã của chúng tôi (và nó là mã OLD, như trong Perl 3 hoặc Perl 4 ngày) trông như thế này (tôi đơn giản hóa đáng kể):

@array; 
push(array, $some_scalar); 

Chú ý rằng array trong số push() không có số @. Tôi sẽ giả định rằng các mã phía sau đẩy biết rằng đối số đầu tiên được coi là mảng để lấy mảng từ các typ = array typeglob. Đó là nhiều hay ít nó? Nếu Perl có thể làm điều đó mà không có vấn đề, tại sao bạn cần phải bao gồm các @ ở tất cả?

Answer 1

Đây là 'tính năng' cũ của trình phân tích cú pháp. @ Không bắt buộc phải đẩy nếu biến là biến gói. Điều này được coi là nhiều như là một lỗi mà nên được cố định mặc dù. Bạn thực sự không nên làm điều này.

Answer 2

Đây là một "tính năng" đáng ngờ của perl, hành vi không được chấp nhận; nó phải là một lỗi, nhưng nó hoạt động.

Nếu bạn bật những lời cảnh báo của trình biên dịch (perl -W, rất khuyến khích), nó cảnh báo:

Array @aa missing the @ in argument 1 of push() at xx.pl line 2. 

Answer 3

Nicholas Clark explains:

Đó là Perl 1 cú pháp.