for my $key ($keys %ENV) {
    print $key, ": ", $ENV{$key}, "<br>\n";
}