Select Code to Download

my $command = qq{syscall $interp};
run_command_string($command);
...
        $log->info("child exited with value $?");
    }
}

use File::Copy;
use File::Path;
...

move( "$filename", "$file2" ) or die "move failed: $!";
#check File::Path's mkpath for use