http://qs321.pair.com?node_id=592

Current Perl documentation can be found at perldoc.perl.org.

Here is our local, out-dated (pre-5.6) version:

To turn "abbcccd" into "abccd":

    s/(.)\1/$1/g;