Re: Replace every character that occurs more than one and their occurences are even

This would work, for example:

foreach(@array) {
    $_ =~ s/(\w)\1/XY/g;
    print "$_ ";      # --> dXYmon jXYz stXYr cXYXYar XYXYb XYXYXYXYXY
+b
}
[download]

Comment on Re: Replace every character that occurs more than one and their occurences are even Download Code

Replies are listed 'Best First'.
760829 by stringZ (Acolyte) on Apr 29, 2009 at 08:11 UTC
Thanks, this one works :)	[reply]