Click here to get back home

FAQ 5.32 How do I dup() a filehandle in Perl?

 HomeNewsGroups | Search | About
 comp.lang.perl.misc    Post an article   get this group's latest topics as an RSS feed add this group's latest topics to your My MSN content add this group's latest topics to your My Yahoo content
Subject Author Date
FAQ 5.32 How do I dup() a filehandle in Perl? PerlFAQ Server 07-08-2005
Posted by PerlFAQ Server on July 8, 2005, 4:03 pm
Please log in for more thread options
>>
>> [snip]
>>
>> > if I print "$1\n",
>> > the file prints just fine. But, if I do something like print "$1 after
>> > \n", the whole output is messed up. If I print "before $1\n", nothing
>> > prints at all. If I print "before $1 after\n", only after prints.
>>
>> not really sure, but could be a rogue "\r" in $1,


> There
> is a rogue carriage return (0xd) in the string

> Is there something I can do to deal with this
> situation?


Repair the corrupted file:

perl -p -i -e 'tr/\r//d' bad_file


--
Tad McClellan SGML consulting
tadmc@augustmail.com Perl programming
Fort Worth, Texas

Similar ThreadsPosted
FAQ 5.31 How do I dup() a filehandle in Perl? February 19, 2005, 6:03 pm
FAQ 5.32 How do I dup() a filehandle in Perl? April 22, 2005, 5:03 pm
FAQ 5.32 How do I dup() a filehandle in Perl? September 25, 2005, 4:03 pm
FAQ 5.32 How do I dup() a filehandle in Perl? November 15, 2005, 5:03 pm
FAQ 5.32 How do I dup() a filehandle in Perl? January 23, 2006, 6:03 am
FAQ 5.32 How do I dup() a filehandle in Perl? April 28, 2006, 9:03 pm
FAQ 5.32 How do I dup() a filehandle in Perl? August 25, 2006, 3:03 pm
FAQ 5.32 How do I dup() a filehandle in Perl? November 23, 2006, 3:03 am
FAQ 5.32 How do I dup() a filehandle in Perl? March 9, 2007, 9:03 pm
FAQ 5.32 How do I dup() a filehandle in Perl? May 24, 2007, 3:03 pm

Our other projects:

Art Dolls, Fairies and Mermaids - Sunnyfaces.net

Roy's Linux, Programming and Search Engines messages

1-Script XML SitemapXML Sitemap