>>339

ありがとう。それが欲しかったんです。
# perljp, Encode, Encode::JP あたりのドキュメントに書いておいて欲しかった。。

>>341

ええっ。IO::Socket の read は fread() による実装なので

> while ($s->read($line, 8192) > 0) {

これで問題ないと思っていたのですが、抜けが出ますでしょうか。これまでに
上の実装で何GBも転送してきて、特に問題が起きたことは無かったのですが…。