I think this may be because your delimiter is actually comma-space, rather than just a comma as I was assuming, and which is the default of Text::CSV. So it sees those fields as beginning with a space and including a double quote, rather than quoted by a pair of double quotes between two commas. I tried changing the delimiter for the input file to comma -space, and it worked much better:
my $ic = Text::CSV->new({sep_char => ', '}) + or die Text::CSV->error_diag();
Aaron B.
Available for small or large Perl jobs; see my home node.
In reply to Re^5: Converting File Delimiters
by aaron_baugher
in thread Converting File Delimiters
by mmueller44
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |