Select Code to Download

  die "unable to fork: $!" unless (defined(my $id = fork());
  if ($id == 0) {
    exec($testpath) or die "unable to exec $testpath: $!\n";
  }

while (wait > -1) {};