perl XML-LibXML-Iterator