CGI::Carpを使っているのにInternal Server Error

うまく動きません。コマンドラインでは作動するのですが、ブラウザではダメでした。

　#! /usr/bin/perl -w

　use Calendar::Simple;
　use CGI::Carp qw(fatalsToBrowser);
　use Data::Dumper;
　use lib "/home/kojima/kojima00001/myperl/lib";

　my @curr=calendar;

　print Dumper(@curr);


もっともその理由は分かりました。
　use lib "/home/kojima/kojima00001/myperl/lib";
が
　use Calendar::Simple;
より後にあったことです。

さらに言うと、ブラウザで動かすためにはHTMLをサポートしていないといけませんが、このコードはHTMLをサポートしていません。

この２点を修正して、無事このプログラムはブラウザでもうまく動いたのですが、問題はうまく動いてくれていなかった時のブラウザの表示です。

Internal Sever Errorが出ていました。それじゃ何のことか分からなくて嫌だから
　use CGI::Carp qw(fatalsToBrowser);
と宣言してあるのです。

モノの本によると、この場合は
　Software error:
　Can't locate Calendar/Simple.pm in @INC (@INC containts: @INCに含まれるディレクトリがズラズラ・・・).
　BEGIN　failed--compilation aborted at calendar.cgi line3.
というエラーメッセージが表示されるはず。

つまりCGI::Carpが機能していないことになります。

何故でしょう？

お手数をお掛けします。

No.1 ベストアンサー 回答者： _--_1l1_1_ 回答日時： 2009/06/13 15:35

　use Calendar::Simple;

　use CGI::Carp qw(fatalsToBrowser);
を
　use CGI::Carp qw(fatalsToBrowser);
　use Calendar::Simple;
とすればどうか

この回答へのお礼

凄い！

これも順番だったんですね。

ありがとうございます！

お礼日時：2009/06/13 16:07