my @myTerms = ( 'blah foo', 'bar' ); my $term1 = "blah"; my $term2 = "blah foobar"; #### ( grep /\Q$term\E/, @myTerms)