Select Code to Download

$text = "QUERY = \"SOME QUERY WITH \"\" (DOUBLE QUOTES)\" YEEHA";
$text =~ m/^(.*)"+\s(\w+)$/g;
print "dollar one =$1\n\ndollar two = $2\n\n";
# $1 == QUERY = "SOME QUERY WITH "" (DOUBLE QUOTES)
# $2 == YEEHA

$text =~ m/^(.*)?"+\s(\w+)?$/g;