perl -e '$_="\"ab\"cde\"fgh\"";print $1,"\t" while /(".*?(?="))/g'