This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
[DOC PATCH] chop warning in perlport
authorXavier Noria <fxn@hashref.com>
Tue, 2 May 2006 12:08:34 +0000 (14:08 +0200)
committerRafael Garcia-Suarez <rgarciasuarez@gmail.com>
Tue, 2 May 2006 10:11:10 +0000 (10:11 +0000)
Message-Id: <E06C0594-CAF6-4822-8EB4-8E06EAD4A889@hashref.com>

p4raw-id: //depot/perl@28054

pod/perlport.pod

index de753e7..b639c47 100644 (file)
@@ -94,21 +94,9 @@ from) C<\015\012>, depending on whether you're reading or writing.
 Unix does the same thing on ttys in canonical mode.  C<\015\012>
 is commonly referred to as CRLF.
 
-A common cause of unportable programs is the misuse of chop() to trim
-newlines:
-
-    # XXX UNPORTABLE!
-    while(<FILE>) {
-        chop;
-        @array = split(/:/);
-        #...
-    }
-
-You can get away with this on Unix and Mac OS (they have a single
-character end-of-line), but the same program will break under DOSish
-perls because you're only chop()ing half the end-of-line.  Instead,
-chomp() should be used to trim newlines.  The L<Dunce::Files> module 
-can help audit your code for misuses of chop().
+To trim trailing newlines from text lines use chomp().  With default 
+settings that function looks for a trailing C<\n> character and thus 
+trims in a portable way.
 
 When dealing with binary files (or text files in binary mode) be sure
 to explicitly set $/ to the appropriate value for your file format