$ perl -e'use strict;@1=(666)'
$ perl -e'use strict;@STDOUT=(666)'
$ perl -e'use strict;@ENV=(666)'


#but

$ perl -e'use strict;@a=(42)'                   Global symbol "@a" requires explicit package name (did you forget to declare "my @a"?) at -e line 1.


$ perl -e'print $]'
5.040003$