The stupid question is the question not asked | |
PerlMonks |
comment on |
( [id://3333]=superdoc: print w/replies, xml ) | Need Help?? |
$string =~ s/(.)\1+/length($&).$1/eg;
In reply to Re: Compressing a text file using count of continous characters
by pfaut
|
|