Perlコーディング初心 ..
[
2ch
|
▼Menu
]
■コピペモード
□
スレを通常表示
□
オプションモード
□このｽﾚｯﾄﾞのURL
■項目テキスト
346:nobodyさん 08/04/17 07:21:16 use utf8; use encoding "utf8"; # ↓UTF8でPOSTされた情報を想定(内部ではワイドキャラクタとして格納されてます) my $str = '%E8%8C%B6%E6%B1%B2%E5%85%BC%E9%9B%91%E7%94%A8%E4%BF%82'; utf8::encode($str); # 一旦UTF-8フラグを落として # ↓URLデコード(今回$strに+はないのでそのへんは省略) $str =~ s/%([0-9A-Fa-f][0-9A-Fa-f])/pack("H2", $1)/eg; utf8::decode($str); # UTF-8フラグを付け直す 347:nobodyさん 08/04/17 09:58:36 >>345,>>346 > # ↓UTF8でPOSTされた情報を想定(内部ではワイドキャラクタとして格納されてます) > my $str = '%E8%8C%B6%E6%B1%B2%E5%85%BC%E9%9B%91%E7%94%A8%E4%BF%82'; それデコードしたら、バイナリ(utf8フラグoff)のUTF-8文字列。 とりあえず、use utf8;とuse encoding "utf8"を外して、そのままprintしてみ。 ちゅうか、use utf8 とuse encoding "utf8"両方してる意味がわからん。 348:nobodyさん 08/04/17 14:34:42 FD3bsXbG >>345です 解決しました。情報に感謝します。 >>346の内容を、Encode::〜でやりました。 こういうのって結構な落とし穴ですね。フラグのことはわかっているつもりでしたが……
次ページ
最新レス表示
スレッドの検索
類似スレ一覧
話題のニュース
おまかせリスト
▼オプションを表示
レスジャンプ
mixiチェック！
Twitterに投稿
オプション
しおりを挟む
スレッドに書込
スレッドの一覧
暇つぶし2ch
4955日前に更新/211 KB
担当:undef