PC系,Web系,映像系とか。PC無しじゃ生きていけない!?

最新記事

perl で文字コード変換

参った・・・。

7年ほど前に設置したショッピングカートcgi。

今回、ホームページをリニューアルするにあたり、他の業者が入りカート以外を作りなおすことになった。

業者から連絡が・・・。

「utf8で送れないんですケド・・・・」

当時はutf-8とかsjisとかわけがわからなかった。どうやらsjisで作られていたようだ。

POSTされた文字列をsjisに変換することに。
perlなんて全然わからないよ。。。グーグル先生頼みで調べてみると、
Encode.pmを使えばいいらしい。
use Encode;
use Encode::Guess qw/ euc-jp shiftjis 7bit-jis /;
Encode::from_to($value, ‘Guess’, ‘euc-jp’);
と、やってみたところ、動かない・・・。
perl5.8から使えるのだが、使っているレンタルサーバーはperl5.6・・・だめじゃん。
って、ことで、もいっかい調べなおすと、旧タイプにはこれがいいらしい。
use Jcode;

$search_name = Jcode::convert( $search_name, “sjis”);

って、ことで、POSTされた文字列をこれで変換したらうまくできました。
これなら、文字列がsjisでも自動判別してくれるので、そのまま出力してくれるぽい。
http://perl.g.hatena.ne.jp/tetsu23/20060224/p2
http://www.nishishi.com/blog/2006/02/jcodepm.html

コメント (0)

コメントはまだありません。

コメントのRSSを取得する トラックバック

コメントする

ツイッターでつぶやく