Well, yes and no... actually the tests for bare "\n" and "\r" would work, but the test for "\r\n" would fail (at least, in MacPerl on MacOS Classic). It is advisable to replace "\r\n" and /\r\n/ with "\015\012" and /\015\012/, respectively.