http://www.perlmonks.org?node_id=901229


in reply to Help parsing a complicated csv

Check out Text::CSV