> read(STDIN, $buffer, 65536) or die "$!";

use strict;

参考：2004/03/18(木)02時29分32秒