Click here to get back home

How to do pattern matching for multiple files 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
How to do pattern matching for multiple files in Perl Kimi 08-28-2007
Get Chitika Premium
Posted by Kimi on August 28, 2007, 9:23 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

Posted by Ben Morrow on August 28, 2007, 10:55 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
Help with Pattern matching. Matching multiple lines from while reading from a file. May 2, 2007, 11:37 pm
multiple regex pattern matching per line? September 4, 2004, 2:24 pm
perl pattern matching August 31, 2004, 8:57 am
perl pattern matching March 12, 2005, 8:25 am
Pattern matching in perl August 10, 2006, 9:25 am
RE Perl Pattern matching April 2, 2008, 1:23 am
Perl pattern matching and extraction March 8, 2008, 8:48 am
[perl-python] string pattern matching February 1, 2005, 1:45 pm
[perl-python] text pattern matching, and expressiveness February 7, 2005, 12:00 pm
Pattern Matching December 15, 2004, 10:51 am

Our other projects:

Art Dolls, Fairies and Mermaids - Sunnyfaces.net

Roy's Linux, Programming and Search Engines messages

1-Script XML SitemapXML Sitemap