my $re = quotemeta($VarString);
   next unless $Array[$Counter] =~ m/$re/;