rlm@7: #!/usr/bin/perl -wT
rlm@5: 
rlm@7: $ENV{"PATH"} = "/usr/bin";
rlm@7: delete @ENV{qw(IFS CDPATH ENV BASH_ENV PATH)};
rlm@7: 
rlm@7: exec("whoami");
rlm@7: 
rlm@7: #unshift(@ARGV, "hg");
rlm@7: #exec(@ARGV);