Help for this page

Select Code to Download

Select or download this

echo 'aaabbccccdd eee' | perl -aF'(.)(?!\1)' -lne 'while(@F){push@M,sh
+ift(@F).shift(@F)}print for @M'

Select or download this
```
aaa
bb
...
dd

eee
```