Select Code to Download

use strict;
use warnings;
...

$twig->parse($xml);
print $twig->sprint;

<sites>
  <site siteid="ONE">
...
  <address>address2</address>
  <contact>contact2</contact>
</sites>