my @nodes = (
 bless ( {
    'tag' => 'html',
    'data' => [ bless ( {
                  'tag' => 'head',
                 'data' =>  bless ( { 
                             'tag' => 'title',
                            'data' => 'acme products' }, 'Node' ),

                bless ( {
                  'tag' => 'body',
                 'data' => [ 'some orphan text that needs to be in the output',
                             bless ( { 
                               'tag' => 'use'
                              'data' => [ bless ( {
                                            'tag' => 'orphan',
                                           'data' => 'action/'}, 'Node' ),

                                          bless ( {
                                            'tag' => 'qd'
                                           'data' => 'action' }, 'Node' ),
 
                                          bless ( {
                                            'tag' => 'orphan',
                                           'data' => '/main.aXML' }, 'Node' )
                                        ] }, 'Node' )
                             'some more orphan text',
                            ] }, 'Node' )
             ] }, 'Node' )
        );