#!/usr/bin/perl -w

# env-CGI.pl - by Tom Christiansen

use strict;

# Print necessary CGI header
print "Content-type: text/plain\n\n";

# Iterate through ENV variable hash,
# printing values	
foreach my $key (sort keys %ENV) {
	print $key, " = ", $ENV{$key}, "\n";
}