String AAA varname and string AAA and BBB

##

my $sub = $elt->text();
$sub =~ s/AAA/ZZZ/g;
$elt->set_text($sub);

##

##

String ZZZ varname and string ZZZ and BBB