...
print MAINLOG "$_ $ENV{$_}\n" for keys %ENV;
...