Server-provided Environment variables

#!/bin/perl print "Content-type: text/html\n\n"; print "\n"; print "Server-provided Environment variables"; print "\n"; print "\n"; print "\n"; foreach my $x (keys %ENV) { print "\n"; } print "

Environment Variables
$x	$ENV{$x}

\n";