modperl使用模块时出现内部服务器错误

Question

我尝试编写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然后成功。

有什么问题？

谢谢！

Answer 1

那不是mod_perl模块，它是一个CGI程序。

（第一个）问题几乎肯定是你从模块文件的末尾省略了1;这个事实。但是查看Web服务器错误日志将确认这一点。