perl - modperlがモジュールを使用するときの内部サーバーエラー

Question

perl_mod スクリプトを作成しようとしましたが、「Internal Server Error」と表示されます。

これはモジュールファイルです: (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";

「use mm1;」なしで実行しようとすると この main.perl は成功します。

何が問題ですか？

ありがとう！

Answer 1

これは mod_perl モジュールではなく、CGI プログラムです。

1;(最初の) 問題は、ほとんどの場合、モジュール ファイルの末尾からを省略したことです。しかし、Web サーバーのエラー ログを調べると、それが確認されます。