http://www.perlmonks.org?node_id=50569


in reply to Removing characters

The only problem with that, is what if the word is supposed to have 2 of the same letter next to each other? In this silly language of ours, that's rather common. However, there are some letter which probably won't be paired. Y, Q and X for example. But with all the rest, you may want to think of another way to do it.

Note: I'm too tired and hungry to help with any actual code, unfortunately.