Though I think too that Text::CSV is the best to use here (especially since it can handle escaped quotes (\"), I think in this simple case, split *can* be used:
(1) remove the very first and the very last quote, then:
(2) split /","/,....