Re: CR+LF

[svsingh]

I think ZZamboni's Remove the ^M Character from a Document has the answer to your question. Just run your strings through the following substitution before writing them:

s/\r\n?/\n/g

Hope this helps. It saved me when I needed it.

[kelan]

Actually, I don't think this will work because he isn't trying to find CR/LF's in a file and replace with just LF's, he's talking about printing to stdout. The Win32 ActiveState build of Perl actually outputs a CR/LF pair when you try to print "\n". I don't have a Win32 machine handy to test on, but I can think of a couple possibilities:

• Instead of using \n use \x0A (just an ASCII char 10, instead of the "symbolic newline", which gives a ASCII 13/ASCII 10 pair): print "Hi there.\x0ANew line here.";
• Try doing binmode STDOUT; I know you can use that when printing to files so the symbolic newline isn't reinterpreted, and as far as I know STDOUT is just a regular filehandle that you can call binmode on.
• If neither of those work, try writing to a file instead of directly to stdout. Then you can definitely use binmode and avoid getting CR/LF pairs.

kelan

---

Perl6 Grammar Student

[svsingh]

Oh wow. Nice catch. Sorry for sending you down the wrong path Gorio. Thanks for your insights Kelan.