my($type,$make,$color)=$line=~/"((?:[^"\\]*|\\"?)*)"/g;