http://www.perlmonks.org?node_id=1095139


in reply to String substituion with XML::Twig

Try $elt->subs_text( qr'AAA','ZZZ' );
poj