#!/usr/bin/perl print "content-type: text/html\n\n"; print "\n \n

\n";

print "\n";

foreach (sort keys %ENV)
{
  print "    Env Var key: $_ value $ENV{$_}\n";
}

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

\n\n\n"; exit 0;