my $root = XML::LibXML->load_xml( IO => \*DATA )->documentElement; for my $station ($root->findnodes('servers/*')) { say $station->name; for my $ip ( $station->findnodes('ip') ) { say " ".$ip->textContent; } }