Perl でフォームデータから UTF-8 日本語文字をとりだす方法 (プログラミングの小石・大石)

UTF-8 のフォームによっておくられたデータのなかから日本語文字をとりだすことは，日本の Perl CGI プログラマならたいてい必要になることである． ところが，その方法は意外に確立されていないようにみえる． ここでは私が試行錯誤したうえ確立した方法を書く． UTF-8 の環境が確立されるまえは EUC-JP や Shift JIS で日本語データをあつかっていた． ところが，UTF-8 が一般化すると，それまでのやりかたではうまくいかないばあいがでてきた． フォームの送信には GET メソッドと POST メソッドとがある． GET メソッドのときは $ENV{'QUERY_STRING'} に送信データがふくまれている． また，POST メソッドのときはつぎのようにしてデータを獲得する． if ($ENV{'REQUEST_METHOD'} eq 'POST') { read(ST

[pmakino]

確立されてるよなあ…http://blog.livedoor.jp/dankogai/archives/51227060.html