Is it possible to move some of your length testing out of the regex?

while ( /(simple_match)/ ) {
    $count++ if length($1) >= 6;
}
[download]

regexes are hard, my results when I minimize their use have resulted in less maintainance than the times I built big fancy ones. But, sometimes there is no way around it.
--
Snazzy tagline here