Beefy Boxes and Bandwidth Generously Provided by pair Networks
more useful options
 
PerlMonks  

Re^4: The future of Text::CSV_XS - TODO

by tfrayner (Curate)
on May 31, 2007 at 09:32 UTC ( #618445=note: print w/ replies, xml ) Need Help??


in reply to Re^3: The future of Text::CSV_XS - TODO
in thread The future of Text::CSV_XS - TODO

Thanks, that's a huge improvement. I'm afraid I've discovered another slight wrinkle, though:

use strict; use Text::CSV_XS; use IO::File; $/ = "\r"; my $f = IO::File->new_tmpfile; print $f ('a,b,c', $/, '"d","e","f"', $/); seek($f,0,0); my $c = Text::CSV_XS->new({ eol => $/ }); for(0..1){ print join("|",@{ $c->getline($f) })."\n" }
The first getline works, but the second fails. It looks as though the quote characters are blocking recognition of \r as eol (again, the code here works if $/="\n").

Cheers,

Tim


Comment on Re^4: The future of Text::CSV_XS - TODO
Download Code
Re^5: The future of Text::CSV_XS - TODO
by Tux (Monsignor) on May 31, 2007 at 10:39 UTC

    Thanks for testing further. Above situation fixed, and modified example added to testsuite. snapshot updated.


    Enjoy, Have FUN! H.Merijn
      Perfect - that seems to be working fine now. Thanks very much!

      Tim

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://618445]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others rifling through the Monastery: (7)
As of 2015-07-07 06:58 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The top three priorities of my open tasks are (in descending order of likelihood to be worked on) ...









    Results (87 votes), past polls