use YAML;
%ENV = %{ Load `sh -c ". rcfile; perl -MYAML -e'print Dump \\%ENV'"` };

##</code><code>##

use YAML;
%ENV = %{ Load qx{. rcfile; perl -MYAML -e 'print Dump \\%ENV'} };