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

cgi environment

HTML foreach $env_var (keys %ENV) { print "$env_var = $ENV{$env_var}
\n"; } print "
\n";