my $newString = join ', ', map length, split /1+/, $string; [download]
In reply to Re: string manipulation by choroba in thread string manipulation by kimlid2810