#!/usr/bin/perl print "Content-type: text/html\n\n"; print "
\n";
foreach (sort keys %ENV) {
    print "\$ENV{$_}\t$ENV{$_}\n";
}
print "
\n\n";