解决方法
环境变量是Web服务器发送给您运行的每个CGI的一系列隐藏值.您的CGI可以解析它们并使用它们发送的数据.环境变量存储在名为％ENV的哈希中.
例如,$ENV {‘HTTP_HOST’}将给出服务器的主机名.
#!/usr/bin/perl
print "Content-type:text/html\n\n";
print <<EndOfHTML;
<html><head><title>Print Environment</title></head>
<body>
EndOfHTML
foreach my $key (sort(keys %ENV)) {
print "$key = $ENV{$key}<br>\n";
}
print "</body></html>";
有关详细信息,请参阅CGI Environmental variables