> perl -e 'read(STDIN,1024,$buffer) or die'

順番が違った
read(STDIN,$buffer,1024)だった
こればかりはどうにもこうにもよく忘れるな

参考：2004/01/15(木)02時59分26秒