my $n = () = $_ =~ m/@find[match++]/g; $match=0 and next unless $n > $than_some_predetermined_ number;