关于显示IP地址的CGI程序问题

jetking · 发表于 2004-1-19 10:07:17

#!/usr/bin/perl
use CGI::Carp qw/fatalsToBrowser/;
use strict;
use CGI;
print"Content-type:text/html\n\n";
print<<"EOF";
<html>
<body>
<p>你的IP地址是：$ENV{'REMOTE_ADDR'}</p>
</body>
</html>
EOF

复制代码

这段代码在DZSOFT PERL里能运行。
用APACHE服务器访问时，出现500内部错误
而其他的CGI程序能顺利运行，和APACHE和PERL的设置没有关系。
大家帮我看看，怎么回这样？偶想不通，谢谢。

devel · 发表于 2004-1-19 11:58:04

man CGI::Carp
可能是书写格式不标准！！

use CGI::Carp qw(carpout);
print "<h1>Oh gosh</h1>";
print "<p>Got an error: $msg</p>";

tsingson · 发表于 2004-1-22 23:08:30

注意你的 CGI 第一句哟

#!/usr/bin/perl 这一句用在 win32 系统下一般情况下是有问题哟，除非你作了设置 .cgi .pl 由 perl.exe 处理

可以改为 #!c:/perl/bin/perl.exe 这样的形式

如果你没有用到 CGI.pm 的函数（我看现在你没有用到）
那这一句 use CGI; 就不用啦，这样程序可以快一些（减少了 CGI.pm 导入与编译的时间）

		自动登录	找回密码
密码			注册