[Israel.pm] FW: problem with string length in Perl

Gaal Yahas gaal at forum2.org
Tue Aug 10 11:02:12 PDT 2010


Please use Text::CSV to parse CSV files. It's fast and deals with a
ton of subtle issues with these files.

2010/8/10 Levenglick Dov-RM07994 <RM07994 at freescale.com>
>
> Any ideas guys and gals?
>
>
> Best Regards,
> Dov Levenglick
> SmartDSP OS Development Leader
> From: Borowitz Eli-R53547
> Sent: Tuesday, August 10, 2010 15:12
> To: Levenglick Dov-RM07994
> Subject: problem with string length in Perl
>
> Dov,
>
> I am trying to read an excel files saved as  csv file into perl,
> Issue is that some annoying people insist on writing comma’s in the cells themselves. In that case cell content will be saved
> Inside quotes as in “bla,bla,bla”.
> So I wrote a routine to clean it up - see below – but if the cell has more than 256 characters in it will crash.
> I know perl string substitution is limited to 256 max length
> Any ideas?
>
> Thanks
>
> Eli
>
> # lines are cleared of []{}() before this happens – so match is clean
> # get rid of , in fields
>   while ($line =~ m/\"[^\"]+\"/)
>   {
>     $line =~ m/(\"[^\"]+\")/;
>     $badbit = $1;
>     $goodbit = $1;
>     $goodbit =~ s/,/_/g;
>     $goodbit =~ s/\"//g;
>     $line =~ s/$badbit/$goodbit/;
>     print "BB $badbit GB $goodbit \n";
>    }
>
>
>
> _______________________________________________
> Perl mailing list
> Perl at perl.org.il
> http://mail.perl.org.il/mailman/listinfo/perl


--
Gaal Yahas <gaal at forum2.org>
http://gaal.livejournal.com/


More information about the Perl mailing list