my(@foundStrings) = ($myString =~ /"[^"]+"/g);