Select Code to Download

#!/perl/bin/perl -w

...
$twig->print( \*XML_OUT);

close XML_OUT;

- <rrd>
  <version>0001</version> 
...
  </database>
  </rra>
  </rrd>