#!/usr/local/bin/perl
#

   print "Content-type: text/html\n\n";

foreach $st (keys %ENV) {

print "\$ENV{\'$st\'}=$ENV{$st}<br>\n";

};

