$string1 =~ s|(<VT>[^<]+)|$1${string2}|;