Select Code to Download

<objects>
  <obj>
...
    <version></version>
  </obj>
</objects>

use strict;
use warnings;
...
  print $node->toString(1);
  print "\n";
}