Encode::EUCJPMS 0.06が変 - 工夫と趣向と分別と。

　Perl5で丸数字とかを正しく扱うために、Encode::EUCJPMSモジュールを使っている。しかし、0.06だとなぜか「eucJP-ms」エンコーディングが定義されない。テストは以下の簡単なコードで行った。

#!/usr/bin/perl -w

use Encode qw(from_to);
use Encode::EUCJPMS;

#use Encode::Alias;
#define_alias('eucJP-ms' => 'glibc-EUC_JP_MS-2.3.3');

while (<>) {
    from_to($_, 'eucJP-ms', 'cp932');
    print;
}

#!/usr/bin/perl -w

use Encode qw(from_to);

use Encode::EUCJPMS;

#use Encode::Alias;

#define_alias('eucJP-ms' => 'glibc-EUC_JP_MS-2.3.3');

while (<>) {

from_to($_, 'eucJP-ms', 'cp932');

print;

}

　0.05では問題なく動くが、0.06だと「Unknown encoding ‘eucJP-ms’ at test.pl line 10」と怒られる。コメント部分を生かすと動くので、エイリアスが効いていないのではないかと思われるが、果たして。

　作者の方に質問してみたので回答待ち。

コメントを残す コメントをキャンセル

コメントを残すコメントをキャンセル