Select Code to Download

#!/usr/bin/perl
#
...
$root->set_att( 'fille' => 'clémence');
open(PF, "> out.xml") or die "can't open file $!\n";
$twig->print(\*PF);

cat out.xml                                                    
<?xml version="1.0" encoding="UTF-8"?>
<myxml fille="clémence"/