フォームからの入力を受け取る処理の詳細解説 - Web Liberty

フォームからの入力を受け取る処理の詳細解説 最後に、フォームからの入力を受け取る処理の詳細な解説をしておきます。ここまで読み進めてきた方ならば理解できると思います。 フォームからの入力を受け取る処理は以下になります。 if ($ENV{'REQUEST_METHOD'} eq 'POST') { read(STDIN, $alldata, $ENV{'CONTENT_LENGTH'}); } else { $alldata = $ENV{'QUERY_STRING'}; } foreach $data (split(/&/, $alldata)) { ($key, $value) = split(/=/, $data); $value =~ s/\+/ /g; $value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack('C', hex($1))/eg; $val

[tiida26]

perlがんばるぞ