Select Code to Download

"perl", "-e", qq{chdir "/usr/bin"; exec @ARGV;}, $original_cmd, @args

         use Carp;
         use Cwd;
...
           # when I exit the subroutine and $in_dir goes
           # out of scope.
         }