In CSV files, quotes are used to protect things like commas that are not delimiters. I'd recommend using a module like Text::CSV_XS to handle your data:

        use Text::CSV_XS;

        $csv = Text::CSV_XS->new();         # create a new object
        $csv->types(\@t_array);             # Set column types
        $columns = $csv->getline($io);      # Read a line from file $i
+o, parse it
                                            # and return an array ref 
+of fields
[download]