eval 'exec perl $0 ${1+"$@"}' # -*- perl -*- if $running_under_some_shell; use YAML; print "Path is "; print $ENV{PATH}; %ENV = %{ Load qx{.rcfile; perl -MYAML -e 'print Dump \\%ENV'} }; print "Path is now "; print $ENV{PATH};