my $count = grep /\Q$SEARCH_TERM\E/ && /Z/, @C_LOC_ARRAY; #### my $count = grep /Z/, grep /\Q$SEARCH_TERM\E/, @C_LOC_ARRAY;