2009年02月10日

半角カナの変換

ちょっと必要なんでメモ。

PerlでJcode.pmを使わずに半角カナを全角に変換する方法。

●Encode::JP::H2Z::h2z を使う。
use Encode::JP::H2Z;
$str = 'ハンカク';
Encode::JP::H2Z::h2z(\$str);

※Perl5.7.3からコアモジュール
 utf8では変換されない

●Unicode::Japanese を使う。
use Unicode::Japanese;
$str = 'ハンカク';
$str = Unicode::Japanese->new($str)->h2zKana->get;

※コアモジュールではない。
 CPANのサイトからソース落としてきて、実行ファイルからみてUnicode/Japanese.pmに保存したら何か動いた。(コンパイル不要?)
 隠しコマンドがある(半角全部変換とか半角カナだけ変換とか)
 どうやらUTFフラグは落とすようだ。

参考にしたサイト:
 Encodeで全角半角変換 - くれすのPerl日記
 半角←→全角変換,Unicode::Japanese に未公開機能が… - daily dayflower


posted by 鯖缶 at 12:44 | Comment(0) | TrackBack(0) | ただいま開発中 | このブログの読者になる | 更新情報をチェックする
この記事へのコメント
コメントを書く
お名前: [必須入力]

メールアドレス:

ホームページアドレス:

コメント: [必須入力]

※ブログオーナーが承認したコメントのみ表示されます。

この記事へのトラックバック
×

この広告は180日以上新しい記事の投稿がないブログに表示されております。