Click here to get back home

setting perlio layers (e.g., utf8) on "magic" ARGV file handle

 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
setting perlio layers (e.g., utf8) on "magic" ARGV file handle Dave 06-10-2005
Get Chitika Premium
Posted by Dave on June 10, 2005, 10:18 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

Posted by Dave on June 10, 2005, 11:17 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
buffering between tied file handle "layers" July 22, 2005, 3:49 pm
Problem executing several layers deep from a service March 25, 2005, 3:20 pm
PerlIO omission June 8, 2006, 6:03 am
I think I want to use of mmap and perlio June 15, 2007, 10:33 am
syswrite "Bad file descriptor" after successfully writing to that file handle January 7, 2008, 10:31 am
how do you identify if a file is utf8 in perl November 8, 2006, 8:52 am
file handle problem December 4, 2004, 7:29 pm
file handle problem December 4, 2004, 10:42 pm
File Handle Problem September 9, 2006, 2:42 pm
How to decoding a file handle? April 10, 2007, 1:02 am

Our other projects:

Art Dolls, Fairies and Mermaids - Sunnyfaces.net

Roy's Linux, Programming and Search Engines messages

1-Script XML SitemapXML Sitemap