<% map { print "\$ENV{$_} = $ENV{$_}
\n"; } keys(%ENV); %>