perl5.0003などでutf8モジュールも使えないときに,split(//,$str)を 正しく行いたい。EUCの場合2byteは0x8Eで始まることが前提らしいので 以下のようなコードで確認してみた。 my $s="abc:日本語:desu"; print "--------------------- \n"; print "s:$s \n";…