9 lines
188 B
Perl
9 lines
188 B
Perl
#!/usr/bin/perl
|
|
|
|
print "Content-type: text/html\n\n";
|
|
print "<H2>Server Environment Values</H2>";
|
|
foreach $env_var (keys %ENV)
|
|
{
|
|
print "$env_var = $ENV{$env_var} <BR>";
|
|
}
|