in reply to Repeated character in regex

But don't try /(\w)\1.*?(\w)\2.*?(\w)\3/; it could take a while. Use (()=/(\w)\1/g) >= 3 or some such.

In Section Seekers of Perl Wisdom