Select Code to Download

C:\Temp>perl -le"system qw[dir]"
 Volume in drive C has no label.
...
               2 Dir(s)   2,157,553,920 bytes free

File Not Found

my @nosuch = qw[ nosuchfile ];
system {$nosuch[0]} @nosuch;
...
operable program or batch file.
$?(256)=(256)
$!(2)=(No such file or directory)