|
|
|
| Don't ask to ask, just ask | |
| PerlMonks |
Re^3: Split a string based on change of characterby Anonymous Monk |
| on Jul 28, 2007 at 08:43 UTC ( [id://629269]=note: print w/replies, xml ) | Need Help?? |
|
Or even: $_='zyxxaabbbcccccc'; push @a, $1 while /((.)\2*)/g;
Which doesn't destroy original data.
In Section
Seekers of Perl Wisdom
|
|
||||||||||||||||||||||