in reply to (code) (was


I found your script very useful. I'm using it now in our
production system. In fact I added some formatting code to
fit my needs. Why I write is one problem I had with the
originally code, that was your use of split. I cannot say
what is less useful to split a comma separated list as
split, I changed that and use the Module Text::ParseWords
and the quotewords() function now.

while (<CSVFILE>) { chomp; my @field = quotewords("$option{delim}", 0, $_); my $column = 0; ...

This does a perfect job for me, so even if your tokens are
including commas it gets parsed correctly.


...forgotten my perlmonks login...