#!/usr/bin/perl
use strict;
use warnings;
my @myTerms = ( 'blah foo', 'test' );
my $term = "blah";
if ( grep /\Q$term\E/,  @myTerms) {
        print "$term does match\n";
} # end-if
exit;