#! /usr/bin/perl
# Echo ENV variables made available by browser
# From CGI/Perl Cookbook, C. Patchett, M. Wright, J. Wiley, 1998
print "Content-type: text/html\n\n";
print "\n";
print "AIGeneology: Thanks!\n";
print "\n";
foreach $var (sort keys %ENV) {
print "$var = $ENV{$var}\n";
}
print "\n";