ここにきて本気をだしている tokuhirom です。こんにちは。

Perl でコードをかいていると、全角カタカナを半角ｶﾀｶﾅに変換したいとか、そういう要望ってよくあるとおもうんですよね。そんなときは Lingua::JA::Regular::Unicode をつかうといいですね。

    use Lingua::JA::Regular::Unicode qw/alnum_z2h hiragana2katakana space_z2h/;
    alnum_z2h("Ａ１");                                        # => "A1"
    hiragana2katakana("ほげ");                                # => "ホゲ"
    space_z2h("\x{0300}");                                    # => 半角スペース

ちょうべんり。

たぶん、だいたいのケースでいま実装されてる関数でたりてるとおもうんですが、なんかこういうのほしい!ってのあれば要望をおまちしております。

Enjoy!

POD ERRORS

Hey! The above document had some coding errors, which are explained below:

Around line 3:

Non-ASCII character seen before =encoding in 'ここにきて本気をだしている'. Assuming CP1252