c:\@Work\Perl\monks>perl -wMstrict -le
"my $ar;
 print(@$ar);
 print 'done';
"
Can't use an undefined value as an ARRAY reference at -e line 1.

c:\@Work\Perl\monks>perl -wMstrict -le
"sub foo { return @_; }
 ;;
 my $ar;
 print foo(@$ar);
 print 'done';
"

done