エラー画面の制御？

質問

Perl5.6のActivePerlを使っています。

$SIG{__DIE__} = \&error_gamen;

でエラーを飛ぶようにしましたが、画像送信した際に
指定したサイズ以上の写真を送信した場合に

cgi-lib.pl: Request to receive too much data: 1878024 bytes

が表示されるのですが、

use CGI::Carp qw(fatalsToBrowser warningsToBrowser);

を書くとそうなるものでしょうか？

sub error_gamenで作成したデータのみ表示させたいです。

sub error_gamen{
print <<EOT;
Content-type: text/plain

エラーです。
EOT

}

回答No.1

moon_night · ベストアンサー

これは cgi-lib.pl のエラー表示ですので、
cgi-lib.pl のエラー表示部分を変更しないとだめです。