my @parts = $in{'searchtextterms'} =~ /(?|"([^"]*)"|'([^']*)'|(\S+))/g;

##</code><code>##

   foo'bar