23 May
2024
23 May
'24
11:26 a.m.
https://bugs.koha-community.org/bugzilla3/show_bug.cgi?id=36935 --- Comment #6 from Jonathan Druart <jonathan.druart@gmail.com> --- use Text::CSV_XS; open(my $fh, "<", '/tmp/file') or die $!; my $csv = Text::CSV_XS->new( { sep_char => ',', binary => 1, allow_loose_quotes => 1 } ); my @lines = @{$csv->getline_all($fh)}; close($fh); my ( $cde, $str, $pos ) = $csv->error_diag(); my $error = $cde ? "$cde, $str, $pos" : ""; use Data::Printer colored => 1; say p @lines; /tmp/file contains one,two,three 1,2,3 4,5,6 7,8,9 run the script and get no error -- You are receiving this mail because: You are watching all bug changes.