为什么我的Perl CGI程序因"软件错误:......"而失败？

Question

当我尝试运行我的Perl CGI程序时,返回的网页告诉我:

软件错误:如需帮助,请发送邮件给网站管理员(root @ localhost),提供此错误消息以及错误的时间和日期.

这是我在其中一个文件中的代码:

#!/usr/bin/perl

use lib "/home/ecoopr/ecoopr.com/CPAN";
use CGI;
use CGI::FormBuilder;
use CGI::Session;
use CGI::Carp (fatalsToBrowser);
use CGI::Session;
use HTML::Template;
use MIME::Base64 ();
use strict;

require "./db_lib.pl";
require "./config.pl";

my $query = CGI->new; 
my $url = $query->url();
my $hostname = $query->url(-base => 1);
my $login_url = $hostname . '/login.pl';
my $redir_url = $login_url . '?d=' . $url;
my $domain_name = get_domain_name();

my $helpful_msg = $query->param('m');
my $new_trusted_user_fname = $query->param('u');
my $action = $query->param('a');
$new_trusted_user_fname = MIME::Base64::decode($new_trusted_user_fname);

####### Colin: Added July 12, 2009 #######
my $view = $query->param('view');
my $offset = $query->param('offset');
####### Colin: Added July , 2009 #######

#print $session->header;
#print $new_trusted_user;

my $helpful_msg_txt = qq[];
my $helpful_msg_div = qq[];
if ($helpful_msg)

Answer 1

您看到的"请发送邮件给网站管理员"消息是一个通用消息,当出现任何问题并且没有任何处理时,Web服务器会为您提供这些消息.解决实际问题并不是很有意思.检查错误日志以查找程序可能出现的相关错误输出.

并且,通过我如何解决我的Perl CGI脚本问题？找到问题的建议.

我的猜测是你有一个语法错误的悬挂if().您发布的内容不是有效的Perl程序.

祝好运,