脱・jcode.plその2

先日、労せずしてEncode.pmの達人になった(ウソつけ)もとい、ワリと簡単にEncode.pmを使うことができた。で、こんどは仕事でPerl 5.8より前のバージョンでutf8を使うことになり、Jcode.pmの使用を決意。Encode.pmでの成功でかなり天狗になっているので、「ぁ〜、簡単っスよ」とコーディング開始。そしてInternal Server Errorの連発(苦笑)。今回は悶絶した!しかも仕事だから腹たつ!!(笑) jcode'transなくなってるんだもんな〜。問題があったのは全角→半角の変換部分で、数時間悶絶した結果やっとできた。
旧: $ret = &jcode'trans($ret,"ABC","ABC");
新: Jcode->new(\$ret)->tr("ABC","ABC");
う〜ん!山手線のQuiz One並にスッキリ!!これは不具合問題が解決した私の心境のことであって、コーディングスタイルがスッキリした訳ではありません(苦笑)。スッキリさせたいことはいろいろあるなぁ。いろいろとね!!(E方向に意味深強調)