Select Code to Download

sub file_processing {
   my ($script, $arg, $file) = @_;
...

   return @ret;
}

my $pid = open(FILE, "-|");
if (!$pid) {
...

   exec($script, $arg, $file) or die "Couldn't exec: $!";
}