【发布时间】:2012-05-16 07:11:55
【问题描述】:
我尝试编写一个 perl_mod 脚本,但它说:“内部服务器错误”。
这是模块文件:(mm1.pm)
package mm1;
use strict;
use XML::Simple;
use DBI;
require Exporter;
our @ISA = qw(Exporter);
our @EXPORT_OK = qw(asd);
our @EXPORT = qw(asd);
sub asd(){
print "2222";
}
这是主文件:(main.perl)
#!/usr/bin/perl -w
use strict;
use CGI qw/:standard/;
use CGI::Carp qw/fatalsToBrowser warningsToBrowser/;
use mm1;
print header(-type => 'text/html', -charset=>'utf-8');
print "asdasd";
如果我尝试在不使用“使用 mm1;”的情况下运行然后这个 main.perl 就成功了。
有什么问题?
谢谢!
【问题讨论】:
-
查看错误日志以查找更多信息。另见:来自Stack Overflow Perl FAQ:How can I troubleshoot my Perl CGI script?部分适用
-
猜测:它找不到 mm1 模块,因为它不在您的
@INC中。执行use lib 'path/to/module/'或将模块放入现有@INC路径之一。或者,模块不会自行编译。并以1;结束。阅读@daxim 所说的以获得确切的错误消息,以及如何解决该问题。 -
(顺便说一句,让问题尽可能小!)
标签: perl module internal-server-error