Perlで書かれたCGIを FastCGI で動かす方法

Perlで書かれたCGIを FastCGI で動かす方法を調べていたのですが、非常に簡単でした。

FCGI.pm を http://www.cpan.org/modules/by-module/FCGI/FCGI-0.67.tar.gz からインストールし
(すでに fcgi や mod_fastcgiモジュールはインストールされているとします。インストール方法はネットを検索して下さい。)

#!/usr/bin/perl

use strict;
use FCGI;

my $request = FCGI::Request();

while ($request->Accept() >= 0) {
    cgi();   # 元々の ＣＧＩ のメイン
}

というコードを追加するだけで、FastCGIを使って動かせます。

また、CGI.pm を使っているプログラムの場合は、 CGI::Fast モジュールを使うのが良いようです。