Select Code to Download

use strict;
use warnings;
...
my $doc = XML::Smart->new('<?xml version="1.0" encoding="UTF-8"?><root
+></root>');
$doc->{root}{node}{CONTENT} = $utf8;
$doc->save('a.xml', decode=>1);