XML::Twig lets you move chunks of your XML tree ("twigs") around. This article from ORA's xml.com provides a pretty good introduction to the module.