Perlプログラムに関する各種メモ書き

CGI.pm を使ったフォームデコード

cgiパラメータを %form に代入するには以下のようにする

■1. ReadParseを使う(古い)

use CGI qw/:cgi-lib/;
&CGI::ReadParse(?%form);

■2. param() を使う

use CGI;
my $query = CGI->new;
foreach ($query->param() ){
    $form{$_}=$query->param($_);
}

■3. Vars() を使う

use CGI qw(Vars);
%form=Vars();

Ver2.7日本語訳:http://homepage3.nifty.com/hippo2000/perltips/Cgi.htm#SETTING_THE_VALUE_S_OF_A_NAMED_

参考:http://d.hatena.ne.jp/naoya/20051116/1132106196


No.125
07/12 09:33

edit

CGI