See the comments on Parsing CSV file ?s or skip that and take a look at Text::xSV

-- 
Joost       downtime n. The period during which a system
            is error-free and immune from user input.
[download]