Forcing list context on <$fh>

[Tim Greer]

"Hey Wally, whats in that 'if()' statement?".
-sln

You remind me of Xah Lee. You aren't really him, are you?

 

[Gunnar Hjalmarsson]

It's a little unclear, and of course the reference to STDIO is
incorrect. What it means is

In DOSish perls, "\n" means "\012", but when accessing a file by
default a :crlf layer is pushed which will result in "\015\012"
appearing in the file.

That sounds much better to me. I sent a bug report:

http://rt.perl.org/rt3/Public/Bug/Display.html?id=63620

(noted that the oldest open docs ticket is 8 years old...)

 

[Tim McDaniel]

As a practical matter, I run enough scripts on Windows (whether
under bash or cmd) and have hit the problem enough that I do
chomp;
s/\r+$//;
as a matter of rote, or instead use \s if I want to strip all trailing
whitespace whatsoever.

Why not just

s/[\r\n]+$//;

in one operation and skip the chomp?

That would assume that $/ contains only carriage returns and ASCII
newlines (that is, not considering the "\n" special casing that gets
done when doing I/O on non-binary files). However, in practice for
me, $/ DOES contain only CR and NL.

 

[Gunnar Hjalmarsson]

As a practical matter, I run enough scripts on Windows (whether
under bash or cmd) and have hit the problem enough that I do
chomp;
s/\r+$//;
as a matter of rote, or instead use \s if I want to strip all trailing
whitespace whatsoever.

Why not just

s/[\r\n]+$//;

in one operation and skip the chomp?

That would assume that $/ contains only carriage returns and ASCII
newlines (that is, not considering the "\n" special casing that gets
done when doing I/O on non-binary files).

What "\n" special casing?

http://groups.google.com/group/comp.lang.perl.misc/msg/932b35d8434e2f11