#! /usr/bin/perl -w print "Content-Type: text/html\n\n"; print "\n"; print "CGI Script Umgebung\n"; print "\n"; print map { "$_ = $ENV{$_}
\n" } sort (keys (%ENV)); print "\n";