mod_perlを使おう！

**名無しさん** · 01/11/07 17:42

CGIを激速で実行できるmod_perlについて語りませう。
関連リンク等は>2

**名無しさん＠お腹いっぱい。** · 01/11/08 18:15

つれづれなるままに、cgi_to_mod_perlの翻訳でも。

**名無しさん＠お腹いっぱい。** · 01/11/08 18:15

[名前]
cgi_to_mod_perl - CGIの代わりにmod_perlを使うための最初のステップ

[説明]
READMEや他のmod_perlドキュメントに書かれているように、CGIの代わりとして
mod_perlを使うということは、mod_perlパッケージが提供する機能のうちのごく
一部分に過ぎません。ですが、それがmod_perlの一番メジャーな使い方ですので、
すぐ使えるやり方をこの文書で説明します。

[インストール]
INSTALLを読んでください。たいてい次のやり方で大丈夫です。

perl Makefile.PL && make && make install

[設定]
CGI代わりとしてmod_perlを使うときのお勧めの設定です。

Alias /perl/ /real/path/to/perl-scripts/

<Location /perl>
SetHandler perl-script
PerlHandler Apache::Registry
Options +ExecCGI
</Location>

'Location'の指すのはURIで、ディレクトリではありません。上の<Location /perl>
というのは、

<Location http://www.hoge.com/perl>;
ということです。

**名無しさん＠お腹いっぱい。** · 01/11/08 18:23

こうすると、指定した場所の下にあるファイル（あなたのファイルシステムで
/real/path/to/perl-scripts/ 以下にあるファイル）はApache::Registryモジュールに
よって処理されることになります。(Apache::RegistryはCGI環境をエミュレートする
モジュールです。）
ファイルは存在していて、実行可能で、それに'Options ExecCGI'がオンになっていなければ
なりません。

もし、どこに置かれたファイルでもmod_perlが拡張子を見てスクリプトを実行してくれるように
したいなら、設定はこんな感じです：

<Files ~ "\.pl$">
SetHandler perl-script
PerlHandler Apache::Registry
Options ExecCGI
</Files>

**名無しさん＠お腹いっぱい。** · 01/11/08 18:35

'ScriptAlias'はmod_perlでは'効かない'ことに注意してください。

[CGIの移植]

[I/O]
Perl5.004を使っているならほとんどのCGIスクリプトは手を加えずにmod_perlで動くでしょう。
もし5.003をお使いなら、Perlのビルトイン関数 read() と print() はCGIと同じように動いて
くれません。CGI.pmを使っているなら、昔ながらの print() の代わりに $query->print を
使ってください。

[ヘッダ]
mod_perlはデフォルトではヘッダをまったく送りませんが、もし変えたければこうします。

PerlSendHeader On

これでレスポンス行や一般的なヘッダがmod_cgiと同じように送られるようになります。
ですが、mod_cgiと同じように、PerlSendHeaderも終わりの改行コードは送りませんので、
スクリプト自身が送らなければなりません。例えば：

print "Content-type: text/html\n\n";

**名無しさん＠お腹いっぱい。** · 01/11/08 18:40

もしCGI.pmを使っていて'print $q->header'としているなら、PerlSendHeaderは
必要「ありません」。

[NPHスクリプト]
'nph'CGIスクリプトを実行したいなら、コードにこれを追加してください：
local $| = 1;

普段 PerlSendHeader を On にしているなら、httpd.confにこれを追加してください：
<Files */nph-*>
PerlSendHeader Off
</Files>

**名無しさん＠お腹いっぱい。** · 01/11/08 18:50

[プログラミング作法]
CGIはだらしないプログラミングを許してくれますが、mod_perlは違います。
なぜでしょうか？ CGIスクリプトの一生はは一回のHTTPリクエストで終わりますし、
それぞれ独立したプロセスです。リクエストが終わればプロセスはなくなり、
グローバル変数や開けっ放しのファイルなど、なにもかもきれいに片付けて
もらえます。しかしmod_perlで走るスクリプトはもっと長い生涯を送ります。
何回ものリクエストの間に、一つのプロセスでいくつものスクリプトが処理されます。
つまり、自分で後片付けをする必要があるのです。耳にされていると思いますが：

必ず'use strict'と'-w'オプションを使うこと！

**名無しさん＠お腹いっぱい。** · 01/11/08 18:57

このことはmod_perlでのPerlでは他のどんな環境での場合よりも重要です。
必要ではありませんが、「強く」推奨されています。それに長い目で見ると
時間の節約にもなります。
スクリプトをきれいに書いておいて損はないですよ！

[落とし穴]
mod_perl_traps参照

**名無しさん＠お腹いっぱい。** · 01/11/08 18:59

ふ～時間かかっちゃった。（もうあったりして・・・日本語訳）
mod_perl_trapsは後ほど。
他にやってくれる人がいたらお任せします～

**名無しさん＠お腹いっぱい。** · 01/11/09 02:11

自分のSUN Cobalt RaQ4の環境変数見てみると、
mod_perlとあります。これはもうmod_perlが入っているってことなんでしょうか？