#!/usr/bin/perl # # cgi_env.pl - A simple CGI script to print environment variables # # # Print all of the necessary header info print < Environment Variables

Environment Variables

ENDOFTEXT # Now loop over and format environment variables foreach $key (sort keys %ENV) { print "\n"; } print "

Variable	Value
$key	$ENV{$key}

\n";