#!/usr/bin/perlprint "Content-type: text/html\n\n";print "Server Environment Values";foreach $env_var (keys %ENV) { print "$env_var = $ENV{$env_var} ";}