Unless you tell it otherwise, Perl adds a :crlf to file handles on Windows, causing CRLF to be converted to LF automatically on read, and vice-versa on write.

binmode($fh) will disable the :crlf layer.