Remove the tag of an XML node with certain attributes using perl XML::LibXML

I am using the perl XML::LibXML module to manipulate an XML file.