mod_perlの問題

仕事の悩みその2。


とあるCGIのパフォーマンスを考慮するためmod_perlを導入しました。

テスト用のcgiを作成して、
問題なくmod_perlで実行されることまで確認しました。
意外と簡単だな〜とホクホクしながら本番用のcgiを実行してみると…


なぜかうまくいかない


なんで?
実はこのCGI、レスポンスとして
IMG画像を返却するプログラムなのですが
どうもその辺りがうまく行っていない様子。


こんなcgiですね。

  $file = 'test.gif';
  $imgtype = 'gif';

  open(IMG, "$file") or die;
  binmode IMG;
  binmode STDOUT;
  print "Content-type: image/$imgtypenn";
  print while (<IMG>);
  close(IMG);


同じソースをcgi版、mod_perl版で実行すると
mod_perlの場合のみ表示されないので、
やはりmod_perlの問題だと思う。バグ?
どうしたもんか。

バージョンとかいろいろ変更してテストしてみるしかないかな。
それにしてもmod_perlは情報が少ないなぁ。