my $xml = new XML::Simple();
  my $tree = $xml->XMLin(DATA]);

  my $addr0 = $tree->{hosts}{server}[0]{address}[0] ;
  my $addr1 = $tree->{hosts}{server}[1]{address} ;