Select Code to Download

#FROM INCOMING FORM INPUTS
$query = '(St\.\s)(Mt\.\s)(?=Helens)';  #right way
...

$query = "(St\\.\\s)(Mt\\.\\s)(?=Helens)"; #ok, but confusing
print "$query\n";    ## (St\.\s)(Mt\.\s)(?=Helens)