Select Code to Download

my ($container) = $dom->findnodes('/container');
my $n2 = $container->appendChild('XML::LibXML::Element'->new('node2'))
+;
$n2->appendText("\N{LATIN CAPITAL LETTER U WITH ACUTE}");
binmode *STDOUT, ':encoding(UTF-8)';
print $dom;