listing actions/default/body.aXML ---------------------------------
##
package actions::default::body;
my @nodes = (
bless ( {
'tag' => 'html',
'data' => [ bless ( {
'tag' => 'head',
'data' => bless ( {
'tag' => 'title',
'data' => 'acme products' }, 'Node' ),
bless ( {
'tag' => 'body',
'data' => [ bless ( {
'tag' => 'orphan',
'data' => 'some orphan text that needs to be in the output' }, 'Node' ),
bless ( {
'tag' => 'use'
'data' => [ bless ( {
'tag' => 'orphan',
'data' => 'action/'}, 'Node' ),
bless ( {
'tag' => 'qd'
'data' => 'action' }, 'Node' ),
bless ( {
'tag' => 'orphan',
'data' => '/main.aXML' }, 'Node' )
] }, 'Node' )
bless ( {
'tag' => 'orphan',
'data' => 'some more orphan text'
), 'Node' )
] }, 'Node' )
] }, 'Node' )
);
sub getNodes { return @nodes; }
1;