#! /usr/bin/perl
print "Content-type: text/html\n\n";
for $i (%ENV) { print "$i <hr>\n" }