Re: why isn't split() working here?

7stud:

If you set $whole_file = "aaa\nbbb\nccc\nxxx\nyyy\xzzz"; in your first example, you'll see that it works there, too. I'd guess that you're on a windows box and your DATA section actually looks like: "aaa\r\nbbb\r\nccc\r\nxxx\r\nyyy\r\nzzz\r\n". If that's true, then changing your split expression to /xxx\r?\n/ or /xxx[\r\n]+/ might save the day for you.

...roboticus

When your only tool is a hammer, all problems look like your thumb.

Comment on Re: why isn't split() working here? Select or Download Code

Replies are listed 'Best First'.
Re^2: why isn't split() working here? by JavaFan (Canon) on Dec 09, 2010 at 09:59 UTC
Or if you are running 5.10 or newer: `split /xxx\R/` [download]	[reply] [d/l]
Re^2: why isn't split() working here? by 7stud (Deacon) on Dec 09, 2010 at 03:42 UTC
Thanks. I was using codepad.org to run some code, and per your suggestion if I switch \n to \r\n, then my code works. I was using codepad.org to run some code using a windows computer, but I still don't quite understand why perl doesn't seemlessly translate \r\n to a \n. When I hit return on a windows computer, I should be entering \r\n--not just \r.	[reply]
Re^3: why isn't split() working here? by ikegami (Patriarch) on Dec 09, 2010 at 04:35 UTC
Perl does seamlessly convert \r\n to \n on Windows unless you binmode. It would be nice if there was a layer that handled common line endings seamlessly, but noone's gotten around to doing it. It's not that hard, even.	[reply]
Re^4: why isn't split() working here? by Anonymous Monk on Dec 09, 2010 at 07:11 UTC
PerlIO::via/PerlIO::eol	[reply]
Re^5: why isn't split() working here? by ikegami (Patriarch) on Dec 09, 2010 at 16:08 UTC
Re^3: why isn't split() working here? by Anonyrnous Monk (Hermit) on Dec 09, 2010 at 04:18 UTC
I still don't quite understand why perl doesn't seemlessly translate \r\n to a \n. Presumably, the perl that codepad.org is running is a Unix-built perl, which means it does not add a `:crlf` PerlIO layer to file handles by default (as is done on Windows). The `:crlf` layer is responsible for transparent `\r\n` <—> `\n` linefeed translations (see PerlIO). Adding `binmode DATA, ":crlf"` before slurping in the data should emulate Windows perl behavior on codepad.org.	[reply] [d/l] [select]


Perl Monk, Perl Meditation
	PerlMonks