Lines Matching refs:ENV
80 # ENV is set to /nonexistant.
296 $new_env{$env} = $ENV{$env} if defined $ENV{$env};
299 $new_env{'ENV'} = '/nonexistant';
308 foreach $pathelt (split /:/,$ENV{'PATH'}) {
321 $new_env{$1} = $2 eq '' ? $ENV{$1} : $3;
326 %old_env = %ENV;
607 #%ENV = %new_env;
608 foreach $k (keys(%ENV)) {
609 delete $ENV{$k};
611 $ENV{$k} = $v while ($k,$v) = each %new_env;