Select Code to Download

function sysub {
   my $cmd = shift;
   my $rc = 0xffff & system $cmd;
...
   }
   return ($rc != 0);
}