-->
通过脚本打印出环境变量:
#!/usr/bin/perl -T
#environment.cgi
use warnings;
use strict;
print "Content-Type: text/html\n\n";
print "<HTML><HEAD><TITLE>Environment</TITLE></HEAD>\n";
print "<BODY><ul>";
foreach (sort keys %ENV){
print "<li>$_:$ENV{$_}</li>\n";
}
print "</ul></body></html>\n";
将其放置于cgi目录中增加其执行权限:
chmod 755 environment.cgi
运行结果如下：
- DOCUMENT_ROOT:/var/www/html
- GATEWAY_INTERFACE:CGI/1.1
- HTTP_ACCEPT:text/xml,application/xml,application/xhtml+xml,text/html;q=0.9,text/plain;q=0.8,image/png,*/*;q=0.5
- HTTP_ACCEPT_CHARSET:gb2312,utf-8;q=0.7,*;q=0.7
- HTTP_ACCEPT_ENCODING:gzip,deflate
- HTTP_ACCEPT_LANGUAGE:zh-cn,zh;q=0.5
- HTTP_CACHE_CONTROL:max-age=0
- HTTP_CONNECTION:keep-alive
- HTTP_HOST:192.168.1.107
- HTTP_KEEP_ALIVE:300
- HTTP_USER_AGENT:Mozilla/5.0 (X11; U; Linux i686; zh-CN; rv:1.8.1.3) Gecko/20070309 Firefox/2.0.0.3
- PATH:/sbin:/usr/sbin:/bin:/usr/bin
- QUERY_STRING:
- REMOTE_ADDR:192.168.1.174
- REMOTE_PORT:49270
- REQUEST_METHOD:GET
- REQUEST_URI:/cgi-bin/environment.cgi
- SCRIPT_FILENAME:/var/www/cgi-bin/environment.cgi
- SCRIPT_NAME:/cgi-bin/environment.cgi
- SERVER_ADDR:192.168.1.107
- SERVER_ADMIN:root@localhost
- SERVER_NAME:192.168.1.107
- SERVER_PORT:80
- SERVER_PROTOCOL:HTTP/1.1
- SERVER_SIGNATURE:Apache/2.2.0 (Fedora) Server at 192.168.1.107 Port 80
- SERVER_SOFTWARE:Apache/2.2.0 (Fedora)
下面对脚本做一点改进:
待续
发表评论