##
use XML::Twig;
$sitefile='/app/sites.xml';
$twig=new XML::Twig;
$twig -> parsefile($sitefile);
$root=$twig->root;
@sites=$root->children;
foreach $site (@sites){
print "Site ".$site->att("siteid")."\n";
#$address = $site->first_child("address")->text;
#print $address."\n";
}