#!/usr/pkg/bin/perl print "Content-type: Text/html\n\n"; foreach (keys %ENV) { print "$_: $ENV{$_}
\n"; }