diff options
| author | Gurusamy Sarathy <gsar@cpan.org> | 1999-02-14 05:51:56 +0000 |
|---|---|---|
| committer | Gurusamy Sarathy <gsar@cpan.org> | 1999-02-14 05:51:56 +0000 |
| commit | fbad3eb55c1f8c84d1dfd0e484ecddeffc891e79 (patch) | |
| tree | f3886be033e03113de9177f18cdf413345741e1c /pod/perlvar.pod | |
| parent | 428f79ef10ad4e14667125f22397bceac3e2c65e (diff) | |
| download | perl-fbad3eb55c1f8c84d1dfd0e484ecddeffc891e79.tar.gz | |
slurping an empty file should return '' rather than undef, with
commensurate effects on ARGV processing
p4raw-id: //depot/perl@2910
Diffstat (limited to 'pod/perlvar.pod')
| -rw-r--r-- | pod/perlvar.pod | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/pod/perlvar.pod b/pod/perlvar.pod index b9b0ce6c0a..44124d6bb0 100644 --- a/pod/perlvar.pod +++ b/pod/perlvar.pod @@ -250,8 +250,8 @@ line. Setting it to C<"\n\n"> will blindly assume that the next input character belongs to the next paragraph, even if it's a newline. (Mnemonic: / is used to delimit line boundaries when quoting poetry.) - undef $/; - $_ = <FH>; # whole file now here + undef $/; # enable "slurp" mode + $_ = <FH>; # whole file now here s/\n[ \t]+/ /g; Remember: the value of $/ is a string, not a regexp. AWK has to be |