#!/usr/bin/env perl

use XML::Simple;
use Data::Dumper;

$xml = new XML::Simple;
$result = $xml->XMLin("myouput.xml");

foreach my $domain (@{$result->{DomainGetListResult}}) {
	print $domain->{DomainGetListResult}->{Domain}->{Name} . "\n";
}