$hop =~ s/(r(eg)e(xp)/mutilate($1,$2)/eg