Click here to get back home

Recursively making a copy of a subdirectory..

 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
Recursively making a copy of a subdirectory.. ashok.anbalan 09-12-2005
Posted by ashok.anbalan on September 12, 2005, 5:12 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 Paul Lalli on September 12, 2005, 5:43 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 Anno Siegel on September 12, 2005, 12:51 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
/~/~/~/~/~/~/ Making a Six-Figure Income From Passive / Money Making Tips its FREEEE /~/~/~/~/~/~/ November 26, 2007, 3:58 pm
Including executable files in a subdirectory May 9, 2007, 11:01 pm
To find a quick way to list all files in the directory(and subdirectory) April 21, 2008, 3:46 am
Use of CGI.pm filehandle with File::Copy::copy in taint mode May 5, 2006, 3:57 pm
"copy" from File::Copy fails but returns success October 16, 2007, 4:43 am
chown recursively June 9, 2005, 9:12 pm
find out all .txt files in a dir recursively November 3, 2005, 2:29 pm
how to recursively search through files (not dirs)? May 11, 2005, 2:59 pm
Recursively Removing Embedded Quotes July 17, 2007, 10:28 am
finding maximum element in an array recursively November 30, 2005, 6:40 am

Our other projects:

Art Dolls, Fairies and Mermaids - Sunnyfaces.net

Roy's Linux, Programming and Search Engines messages

1-Script XML SitemapXML Sitemap