my $pat = "somepattern";
@simMatches = grep{/$pat$num/} @simMatches; # subset of @simMatches