Thanks all for handy solutions.
Improvised from Anomalous Monk's solution

perl -e '$_= q["ab"cde"fgh"];print $1,"\t"  while m/(?=("[^"]*"))/g'
[download]