You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
14 lines
242 B
Perl
14 lines
242 B
Perl
5 years ago
|
#!/usr/bin/perl
|
||
|
print<<'eof';
|
||
|
Content-Type: text/html
|
||
|
<html>
|
||
|
<head><title>CGI Environment Variables</title></head>
|
||
|
<body>
|
||
|
eof
|
||
|
foreach $index (keys %ENV){
|
||
|
print "$index => $ENV{$index} <br>";
|
||
|
}
|
||
|
print<<'eof';
|
||
|
</body>
|
||
|
</html>
|
||
|
eof
|