s/$/CHRISTMAS/
:
s/\([^_]\)\(.\{8\}\)\1/_\2_/
t
s/_//g