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;
    ...
[download]

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

Regards,

Gerrit
--
...forgotten my perlmonks login...