perl tips - Encodeを速く使う方法によると、find_encoding を使うと、Encode による文字変換が早くなるらしいということで実験してみました。 実験条件 use utf8 しない(use utf8 はトラブルが多すぎてやってられないので)。 変換前も変換後も utf8 フラグは立っていないこと。 実験用データとして、42KBのテキストファイル(EUC-JP, 日本語半分ぐらい)を用意。 ソースはこんな感じです。引数に処理したい euc-jp のテキストファイル名を与えます。 use strict; use Benchmark; use Encode; use Encode::Guess qw(euc-jp shiftjis iso-2022-jp); my $euc = join('', <>); my $utf = $euc; Encode::from_to

