Select Code to Download

#! perl -slw
use strict;
...
P:\test>test3
1 2 3
4 5 6

#! perl -slw
use strict;
...
__END__
P:\test>test3
Can't use an undefined value as an ARRAY reference at P:\test\test3.pl
+ line 6.