Select Code to Download

use strict;
use warnings;
...

print $dom->toString;
exit 0;

<?xml version="1.0"?>
<arbre>
...
        </feuilles>
    </branche>
</arbre>