C:\Temp>perl -le"system qw[dir]" Volume in drive C has no label. Volume Serial Number is FDB3-0FE3 Directory of C:\Temp 08/26/2009 05:05 AM
##
my @nosuch = qw[ nosuchfile ];
system {$nosuch[0]} @nosuch;
printf qq{\$?(%d)=(%s)\n\$!(%d)=(%s)\n\n}, $?,$?,$!,$!;
system @nosuch;
printf qq{\$?(%d)=(%s)\n\$!(%d)=(%s)\n\n}, $?,$?,$!,$!;
__END__
$?(65280)=(65280)
$!(2)=(No such file or directory)
'nosuchfile' is not recognized as an internal or external command,
operable program or batch file.
$?(256)=(256)
$!(2)=(No such file or directory)