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

";
  foreach my $key ( sort keys %ENV ) {
      print $key, ": ", $ENV{$key}, "
\n";
  }
  print "

\n";