use Data::Dumper;
open F, ">>logfile" or die $!;
print F Dumper(\%ENV);
close F;