Depends on how twisted the XML has to be or how exactly is it defined at the moment.

You might even just tweak the data structure a bit and have it output by XML::Rules. Whether that will be convenient or not depends on the XML schema.