8 lines
131 B
Perl
Executable file
8 lines
131 B
Perl
Executable file
#!/usr/bin/perl
|
|
use CGI;
|
|
my $cgi = CGI->new();
|
|
print $cgi->header;
|
|
|
|
foreach (keys %ENV) {
|
|
print $_."=".$ENV{$_}."<br>\n";
|
|
}
|