[摘要]");while (<ENV>) {printf("$_");}close(ENV);printf("</pre>\r\n<hr...
");
while (<ENV>) {
printf("$_");
}
close(ENV);
printf("</pre>\r\n<hr>");
printf("<A HREF=\"http://%s:%s/\"><img alt=\"[Back to Top]\" src=\"/images/back.gif\"> Back to Root of Server</A>\r\n",
$ENV{'SERVER_NAME'},$ENV{'SERVER_PORT'});
printf("<hr><i><a href=\"mailto:webmaster\@%s\">webmaster\@%s</a></i> / ",
$ENV{'SERVER_NAME'},$ENV{'SERVER_NAME'});
printf("<i><a href=\"mailto:httpd\@ncsa.uiuc.edu\">httpd\@ncsa.uiuc.edu</a></i>");
printf("\r\n");
关键词:CGI图文详细教程(11)出错脚本