in reply to regexp quandry

First of all, you can't leave out the lower bound to a quantifier. [^\d]{,7} is trying to match a non-digit, and then the text "{,7}". I suggest using \D{0,7}. (In fact, use \D instead of [^\d] in general.)

The regex I'd use would probably look like this:

m{ ($prefix) \D{0,7} (\d\s*){3,15} (?!\d) }gx
where $prefix is some sub-pattern that matches likely leading text.

_____________________________________________________
Jeff[japhy]Pinyan: Perl, regex, and perl hacker, who'd like a job (NYC-area)
s++=END;++y(;-P)}y js++=;shajsj<++y(p-q)}?print:??;