|
|
|
good chemistry is complicated, and a little bit messy -LW |
|
| PerlMonks |
Re: Compressing a text file using count of continous charactersby pfaut (Priest) |
| on Dec 14, 2007 at 17:01 UTC ( #657081=note: print w/ replies, xml ) | Need Help?? |
|
$string =~ s/(.)\1+/length($&).$1/eg;
In Section
Seekers of Perl Wisdom
|
|
||||||||||||||||||||||