print join "\n" => grep /"\w+?/, qw( abc efgh" "ijk lmn "opqr stuv"); #### "ijk "opqr