:
s/-/<<123456789-01>/
s/\(.\)<.*\1\(-*.\).*>/\2/
t
P
/\n\{9\}/Q
s/$/-\n/m
b