perl XML-XSH2