in reply to Re: Longest possible run of a single character
in thread Longest possible run of a single character
A slight improvement. It is better to set the pattern to
$re = qr/((.)(?:\2)*)/ . This will allow
matching strings with single chars, strings like $_ = 'abc' .