#!/usr/bin/perl
print "Content-type: text/plain\n\n";
use CGI;
use CGI::Carp 'fatalsToBrowser';

print qq`\$] (Perl version): $]\n`;
print qq`\$CGI::VERSION: $CGI::VERSION\n`;
print qq`\nEnvironment Variables:\n\n`;

foreach my $var (sort keys %ENV)
{
	print "$var: $ENV{$var}\n";
}