#!/usr/bin/perl -wT# Print a formatted list of all the environment variablesuse strict;print "Content-type: text/html\n\n";my $var_name;foreach $var_name ( sort keys %ENV ) {    print "<P><B>$var_name</B><BR>";    print $ENV{$var_name};}