perlのreadがCRLFを変換しているなんて普通気づくかよｸｿが(;´Д`)