Fast CGIの基礎

perlで使えるモジュール

CGI::FastとFCGIの2つがある。
CGI::FastはCGI.pmによって作成されるCGIオブジェクトのサブクラスなので、CGI関連のモジュールを使いたいのであれば、CGI::Fastを使うのがよいと思われる。

FCGIについては以下が参考になる。
http://fleur.hio.jp/perldoc/mix/lib/FCGI.html

CGI::Fastについては以下が参考になる。
http://egg.bomcity.com/wiki?CGI%3A%3AFast
http://perldoc.jp/docs/modules/CGI.pm-2.89/CGI/Fast.pod

CGI::Fastを試してみる

#!/usr/bin/perl
use strict;
use CGI::Fast;
use CGI::Carp qw(fatalsToBrowser);

while (my $query = CGI::Fast->new) {
  my @params = $query->param;
  print $query->header( -charset => "UTF-8");

  #環境変数
  foreach (keys %ENV) {
    print "$_ : $ENV{$_}<br>\n";
  }
  #クエリ
  foreach my $key (@params) {
    my $value = $query->param($key);
    print "$key = $value<br>\n";
  }
}

で、環境変数とクエリが出力される。