X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2Fimportenv.pl;h=c28ffd054d4a4582bca7a6dffa54df1881df9900;hb=36902e12d2b30e9370acddd3ddab927d842061cf;hp=d56f32633b889e8e07aff6a0f37ffe269da41c8c;hpb=79072805bf63abe5b5978b5928ab00d360ea3e7f;p=p5sagit%2Fp5-mst-13.2.git diff --git a/lib/importenv.pl b/lib/importenv.pl index d56f326..c28ffd0 100644 --- a/lib/importenv.pl +++ b/lib/importenv.pl @@ -8,7 +8,7 @@ local($tmp,$key) = ''; -foreach $key (keys(ENV)) { +foreach $key (keys(%ENV)) { $tmp .= "\$$key = \$ENV{'$key'};" if $key =~ /^[A-Za-z]\w*$/; } eval $tmp;