in reply to How to avoid the duplication in a string

$a =~ s/(.)\1+/$1/g;

[download]

Replies are listed 'Best First'.
Re^2: How to avoid the duplication in a string
by soubalaji (Sexton) on Oct 22, 2008 at 11:10 UTC
    could you please explain what is the meaning for \1+ in perl
[reply]
      could you please explain what is the meaning for \1+ in perl

      In regular expressions, backslashed numeric digits are references back to the preceding captures. So \1 refers to the same thing that was captured in the first set of parentheses, and \2 refers to the same thing that was captured in the second set, and so forth.

      As for the +, it modifies a backreference in exactly the same way it modifies any other atom in a regular expression.

      -- 
      We're working on a six-year set of freely redistributable Vacation Bible School materials.
[reply]

In Section Seekers of Perl Wisdom