$y = sub($x, "([hg])e.*l.", "y\1y123\2y")
