如何忽略双引号中的分割符

有这么一个例子
ab:123,bc:"333,444",cd:456
用,作为分割符，分割出来希望得到是
ab:123
bc:"333,444"
cd:456
这样的效果，忽略双引号中间的分隔符。而不是
ab:123
bc:"333
444"
cd:456
请教各位大侠如何实现！

可以用 Text::CSV 吧。