Help for this page

Select Code to Download


  1. or download this
    perl -ne's/(.)([^\1]*)/print "$1-$2\n"/eg;'
A234
...
A1
A-1