Select Code to Download

system( "ls *.txt" );

my @list=("someprog", "progarg1", "progarg2");
system( @list );

$sysret = system("prog1 file1 | filter -v $version > $tmpfile 2>&1");
$syssig = $sysret & 0x7f;