#!/opt/perl/current/bin/perl print "Content-type: text/html\n\n"; print ""; print "CGI Test"; print ""; print "

Perl Enviroment Info

"; foreach $key (sort keys(%ENV)) { print "$key = $ENV{$key}

"; } print "";