http://www.perlmonks.org?node_id=904422


in reply to get environment variables from a bourne file

something like:
%ENV = ( %ENV,
         map { /^(\w+)\=(.*)$/; }
           split( /\n/, `. /usr/local/env.sh; env` )
       );

[download]

One world, one people

In Section Seekers of Perl Wisdom