Examine and alter environment variables through %ENV
#!/usr/bin/perl foreach $key ( sort keys(%ENV) ) { print "$key==>$ENV{$key}\n"; }