Click here to get back home

FAQ 8.32: How can I write expect 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 8.32: How can I write expect in Perl? PerlFAQ Server 01-04-2005
Posted by PerlFAQ Server on January 4, 2005, 12:03 am
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 8.32: How can I write expect in Perl? November 8, 2004, 12:03 am
FAQ 8.32 How can I write expect in Perl? March 4, 2005, 6:03 am
FAQ 8.32 How can I write expect in Perl? May 29, 2005, 5:03 pm
FAQ 8.32 How can I write expect in Perl? October 7, 2005, 10:03 pm
FAQ 8.32 How can I write expect in Perl? December 5, 2005, 5:03 pm
FAQ 8.32 How can I write expect in Perl? September 19, 2006, 3:03 am
FAQ 8.32 How can I write expect in Perl? March 16, 2007, 10:03 pm
FAQ 8.32 How can I write expect in Perl? June 1, 2007, 3:03 am
FAQ 8.32 How can I write expect in Perl? August 21, 2007, 3:03 pm
FAQ 8.32 How can I write expect in Perl? November 5, 2007, 3:03 am

Our other projects:

Art Dolls, Fairies and Mermaids - Sunnyfaces.net

Roy's Linux, Programming and Search Engines messages

1-Script XML SitemapXML Sitemap