http://qs321.pair.com?node_id=629268


in reply to Re: Split a string based on change of character
in thread Split a string based on change of character

<Zoffix> eval: $_='zyxxaabbbcccccc'; push @a, $1 while s/((.)\2*)//;[@ +a] <_ZofBot> Zoffix: ['z','y','xx','aa','bbb','cccccc']

20070730 Janitored by Corion: Added code tags, as per Writeup Formatting Tips

Replies are listed 'Best First'.
Re^3: Split a string based on change of character
by Anonymous Monk on Jul 28, 2007 at 08:43 UTC
    Or even: $_='zyxxaabbbcccccc'; push @a, $1 while /((.)\2*)/g; Which doesn't destroy original data.