:
s/-/<<123456789-01>/
s/\(.\)<.*\1\(-*.\).*>/\2/
t
/0000/d
h
s/$/:1234567890/
:1
s/\(.\)\(.\)\(.*:.*\2.*\1.*\)/\2\1\3/
t1
s/^\(.\?\([^0]\)\|.*\)\(\2\(.*\)\4\|\1.\):.*/\3\1/p
g
s/$/-/
b