#!perl -w

use CGI qw(:standard);

print header, start_html;

foreach $var (keys %ENV )
{
   print "$var : $ENV{$var}<br />\n";
}
print end_html;