my $xp = XML::XPath->new(xml => $fpdomaininfo );
my $nodeset = $xp->find('//cidr-map');
foreach my $node ($nodeset->get_nodelist) {
	my $node_name = $node->findvalue ( '@name' );
        my $ips_as_string = XML::XPath::XMLParser::as_string($node);
        $ips_as_string =~ s/ /:/g;

        # this prints nice list of ipaddresses 
        # 127.0.0.1:198.168.1.1:198.168.1.2
        print "<hr><hr>" . __LINE__ . "<br>" . $ips_as_string . "<hr><hr>\n";