It would help quite a bit if you could include sample CSV data or elaborate a little more on what is it that you are exactly having to deal with. It is pretty hard for me to be able to provide you with a more constructive comment without sample data ;/.

However, having said that, let me try by pointing you to a few Perl modules that were designed to help programmers like yourself deal with CSV data. Here are a few good ones:

• Text::CSV - simple manipulation of CSV files.
• Data::Table

  This module allows you to manipulate CSV files via it's Data::Table::fromCSV class method. Give this one a thorough try and see if it helps you in any way (I hope it will ;-)

Sorry, Anonymous Monk, but that's about everything I could help you with... Reply to this post if you need any further help, though ;)

_____________________

$"=q;grep;;$,=q"grep";for(`find . -name ".saves*~"`){s;$/;;;/(.*-(\d+)
+-.*)$/;$_=&#91"ps -e -o pid | "," $2 | "," -v "," "]`@$_`?{print"
++ $1"}:{print"- $1"}&&`rm $1`;print"\n";}
[download]