#!/usr/bin/perl
print "Content-Type: text/html;\n\n";
print "<h1>Hello, cgi world</h1>";
print "<table>\n";
print qq|<tr><td><b>$_</b> </td><td> $ENV{$_}</td></tr>\n| for sort keys %ENV;
print "</table>\n";