When I run your code, it generates two outputs:

• some to STDOUT
• other to file web_bu.xml

My guess is that you want all output to go to the file and none to STDOUT. Is that correct? So, what you just posted should be the contents of the output file?

use strict;
use warnings;
use XML::Twig;

my $out_file = 'C:\web_bu.xml';

my $t = XML::Twig->new(
    twig_handlers   => {'display-name' => \&convert},
    pretty_print    => 'indented'
);

$t->parse(*DATA);
open (my $fh_out, '>', $out_file) or die "unable to open '$out_file' f
+or writing: $!";
$t->print($fh_out); # this prints to the filehandle

sub convert {
    my ($t, $elt) = @_;
    my $txt = $elt->text();
    if ($txt =~ /wtw_reports/i) {
        $elt->set_text('SOMEGUY');
    }
}
[download]