【发布时间】:2010-03-16 20:01:44
【问题描述】:
当我尝试运行我的 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)
【问题讨论】:
-
这是你的全部剧本吗?最后一条语句会给你一个语法错误。
-
另请参阅如何对我的 Perl CGI 脚本进行故障排除:stackoverflow.com/questions/2165022/…
-
阅读jdporter.perlmonk.org/cgi_course - Ovid 的 CGI 课程
-
不,这是我的整个脚本..我可以看到页面加载正确,但我在标题顶部收到此错误消息