Lines Matching full:"$ var"
3227 foreach my $var (keys %oldenv) {
3228 if($oldenv{$var} eq 'notset') {
3229 delete $ENV{$var} if($ENV{$var});
3232 $ENV{$var} = $oldenv{$var};
3234 delete $oldenv{$var};
3256 my ($var, $content) = ($1, $2);
3258 $oldenv{$var} = ($ENV{$var})?"$ENV{$var}":'notset';
3261 delete $ENV{$var} if($ENV{$var});
3264 if($var =~ /^LD_PRELOAD/) {
3274 $ENV{$var} = "$content";
3814 foreach my $var (keys %oldenv) {
3815 if($oldenv{$var} eq 'notset') {
3816 delete $ENV{$var} if($ENV{$var});
3819 $ENV{$var} = "$oldenv{$var}";
