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

\n"; }