s/\>/_19_58_21_36_98_71_46_53_7/g
:
s/\(\(\w\)\S*\)\2/\1-/
/ .*--_-/cO
/--_-/cX
t
cC