#!/usr/local/bin/perl -T use strict; print "Content-type: text/html\n\n"; print "\n"; foreach my $key (sort keys(%ENV)) { print "$key = $ENV{$key}
"; } print $ENV{'REMOTE_HOST'}; #prints BLANK for me?! print "hi";