Click here to get back home

FAQ 5.31 How do I do a "tail -f" 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.31 How do I do a "tail -f" in perl? PerlFAQ Server 11-25-2005
Posted by PerlFAQ Server on November 25, 2005, 5: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.30: How do I do a "tail -f" in perl? October 25, 2004, 11:03 pm
FAQ 5.30 How do I do a "tail -f" in perl? February 18, 2005, 6:03 pm
FAQ 5.31 How do I do a "tail -f" in perl? May 3, 2005, 11:03 am
FAQ 5.31 How do I do a "tail -f" in perl? July 19, 2005, 10:03 am
FAQ 5.31 How do I do a "tail -f" in perl? September 25, 2005, 10:03 pm
FAQ 5.31 How do I do a "tail -f" in perl? January 8, 2006, 5:03 pm
FAQ 5.31 How do I do a "tail -f" in perl? May 1, 2006, 3:03 am
FAQ 5.31 How do I do a "tail -f" in perl? July 1, 2006, 3:03 am
FAQ 5.31 How do I do a "tail -f" in perl? August 22, 2006, 9:03 pm
FAQ 5.31 How do I do a "tail -f" in perl? November 21, 2006, 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