How do I remove consecutive pairs of characters?

To turn ``abbcccd'' into ``abccd'': 

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