$testtext2 =~ s/$retext/$repltext/