我需要为一个包含一些for或foreach循环的类编写一些perl脚本。出于某种原因,即使是最简单的For循环也只是返回一个500服务器错误。我检查了很多次,代码也在codepad.org上运行,但我不知道为什么它在服务器上不工作。我没有访问服务器日志的权限,所以我真的不知道发生了什么。这些是一些非常简单的循环,也是导致错误的原因。
@a=(2,3,4);
foreach my $r (@a) {
print $r;
}
或
@a=(2,3,4);
for ($i = 0; $i <= 2 ; $i++) {
print $a[$i];
}
有什么想法吗?
任何时候,在编写CGI脚本时,都要将其放在首位:
use CGI::Carp qw(fatalsToBrowser);
这会将Perl脚本中的错误重定向到浏览器窗口。它应该让您更好地了解问题的原因(假设是在脚本级别)。
它还允许您使用die
:轻松地将自己的错误和测试语句发送到浏览器
die "testing 1 2 3";
这对于进行快速调试非常有用。