$_ = "hint int stint"; s/int/$&$&$&/g; print;