#!ruby -p
gsub(/<([sd][e-t]*>)(.+?)<.\1/){$2+'^H'*$2.size}