in reply to
Re: Yet Another Rosetta Code Problem (Perl, Ruby, Python, Haskell, ...)
in thread Yet Another Rosetta Code Problem (Perl, Ruby, Python, Haskell, ...)
You either like or hate regexps for this kind of thing, but as regexp-based solutions go "ZBBBCZZ".match(/((.)\2*)/g) is damn concise.
I couldn't get the perl version to be that concise... pity.
I hope perl6's Rules allow one to specify a sub-match that can be referenced and then thrown away.