@$arrayref; #### #!/usr/bin/perl -w use strict; my $arrayref; @$arrayref; # line 5 print "ok"; #### Useless use of a variable in void context at test.pl line 5. Can't use an undefined value as an ARRAY reference at test.pl line 5. #### if ($arrayref) { ... } #### #!/usr/bin/perl -w use strict; my $arrayref = 1; for (@$arrayref) { print "ok\n"; } #### Can't use string ("1") as an ARRAY ref while "strict refs" in use at test.pl line 5.