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

\n"; print "\n"; print "\n";