Kernelを2.6系にした関係でUTF-8絡みの変更が増えてますが、その1つにapacheログ解析
ソフトのanalogを使用する際に利用していたPerlスクリプトがそのままでは使えなかったので、
使えるようにした変更内容を忘れないように記録しておきます。
◯元スクリプト
「analogurldecode ベータ版その2」
http://www.inwonder.net/~dayan/soft.html#analogurldecode
EUC以外の文字コードに対応するため、下記の部分を変更した。
★変更前
sub convert_jp { my ($text, $tocode, $fromcode) = @_; if($tocode ne '' and $tocode ne $fromcode){ |
★変更後
"$fromcode"が未設定になってしまうパターンに対応する。
sub convert_jp { my ($text, $tocode, $fromcode) = @_; if($tocode ne '' and $tocode ne $fromcode){ |
この変更を行なうことで、通常通り利用可能になります。
コメントする