複数のパラメータの取得

?の後に記述した複数のパラメータを取得する方法

$buf=$ENV{'QUERY_STRING'};
@pairs=split(/&/,$buf);
foreach $pair (@pairs) {
($name,$value)=split(/=/,$pair);
$value=~ tr/+/ /;
$value=~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
$PARAM{$name}=$value;
}

例えば「test.cgi?YY=2005&MM=5&DD=7」とした場合にプログラムでは
PARAM{"YY"}=2005;
PARAM{"MM"}=5;
PARAM{"DD"}=7;
という連想配列に値が格納されることになる。

パラメータ渡しでＷＥＢアプリを作る場合には必須だな。

今日はＤＶＤ「めだか」を借りてきた。実は第２話だけ見逃していたのだった。やれやれやっと見れた(笑)