printenv revision f3220f54126b25e1cf93cc26c17177b7aef850fd
#!/usr/local/bin/perl
print "Content-type: text/html\n\n";
while (($key, $val) = each %ENV) {
print "$key = $val<BR>\n";
}