为什么 perl编写的CGI 网页中不能用warnings,用-w则可以

Web、Mail、Ftp、DNS、Proxy、VPN、Samba、LDAP 等基础网络服务
回复
maniacus
帖子: 5
注册时间: 2009-05-01 19:04

为什么 perl编写的CGI 网页中不能用warnings,用-w则可以

#1

帖子 maniacus » 2009-11-18 12:05

我用perl编写的的CGI程序,如果是用use warnings;就出现错误.显示的是:500 Internal Server Error。
去掉use warnings 用-w就可以,是什么原因呢?请高手赐教!
代码如下:
#!/usr/bin/perl
# Fig. 7.4: fig07_04.pl
# Program to display CGI environment variables.

use warnings; #这里如果去掉这一行,在开头一行加 -w 就没有错误
use strict;
use CGI qw(:standard);


print header(), start_html( "Environment Variables" );

print '<table border = "0" cellspacing = "2">';

foreach my $variable ( sort( keys %ENV ) ) {
print Tr( td( b( "$variable:" ) ),
td( i( $ENV{ $variable } ) ) );
}

print '</table>', end_html();
头像
木泥黑
帖子: 1339
注册时间: 2008-10-18 12:41

Re: 为什么 perl编写的CGI 网页中不能用warnings,用-w则可以

#2

帖子 木泥黑 » 2009-11-18 14:27

不懂CGI
回复