$VAR1 = {
          'A:tree' => [
                     {
                       'A:twig' => [
                                   {
                                     'B:person' => [
                                                    {
                                                      'B:name' => [
                                                                    'J
+im',
                                                                    'J
+ohn'
                                                                  ]
                                                    }
                                                  ]
                                   }
                                 ]
                     }
                   ],
          'xmlns:B' => 'http://people.example.com/sitting-on-trees-ns'
+,
          'xmlns:A' => 'Plants:'
        };
[download]

and this

$VAR1 = {
          'A:tree' => [
                     {
                       'A:twig' => [
                                   {
                                     'person' => [
                                                {
                                                  'xmlns' => 'http://p
+eople.example.com/sitting-on-trees-ns',
                                                  'content' => 'Jim'
                                                }
                                              ]
                                   }
                                 ]
                     },
                   ],
          'xmlns:A' => 'Plants:'
        };
[download]

As you can see, the first type of XML documents only declares namespaces in the "root-node". The second type of XML documents declares namespaces in a kind of mixed mode: some ns are declared in the "root-node" while others are opened along the way as attribs to keys or values, somewhere down in the nested structure.

Monks,
is there a clever module which does the work of "collecting" the namespaces for me? So that it transforms the second data structure into one resembling the first, moving the ns from the twigs into the root while prepending prefixes pointing to the moved ns automatically?
That would be great!