:
s/(\(-*\))/\1--/
t
s/-\|).*/<123456789-01>/
s/\(.\?\)<.*\1\(-*.\).*>/\2/
t