$VAR1 = bless( { 'max_order' => 6, 'tree' => { 'parent' => undef, 'order' => 1, 'name' => 'rsp', 'children' => [ { 'parent' => $VAR1->{'tree'}, 'order' => 2, 'content' => ' ', 'children' => [], 'type' => 'data' }, { 'parent' => $VAR1->{'tree'}, 'seq_num' => 1, 'name' => 'frob', 'children' => [ { 'parent' => $VAR1->{'tree'}{'children'}[1], 'order' => 4, 'content' => '72157604013085297-45646646467d-280706', 'children' => [], 'type' => 'data' } ], 'seq_count' => 1, 'order' => 3, 'type' => 'tag', 'attributes' => {} }, { 'parent' => $VAR1->{'tree'}, 'order' => 5, 'content' => ' ', 'children' => [], 'type' => 'data' } ], 'type' => 'tag', 'attributes' => { 'stat' => 'ok' } } }, 'XML::Parser::Lite::Tree::XPath' ); $VAR1 = [ { 'parent' => { 'parent' => undef, 'order' => 1, 'name' => 'rsp', 'children' => [ { 'parent' => $VAR1->[0]{'parent'}, 'order' => 2, 'content' => ' ', 'children' => [], 'type' => 'data' }, $VAR1->[0], { 'parent' => $VAR1->[0]{'parent'}, 'order' => 5, 'content' => ' ', 'children' => [], 'type' => 'data' } ], 'type' => 'tag', 'attributes' => { 'stat' => 'ok' } }, 'seq_num' => 1, 'name' => 'frob', 'children' => [ { 'parent' => $VAR1->[0], 'order' => 4, 'content' => '72157604013085297-45646646467d-280706', 'children' => [], 'type' => 'data' } ], 'seq_count' => 1, 'order' => 3, 'type' => 'tag', 'attributes' => {} } ]; $VAR1 = [ { 'parent' => { 'parent' => { 'parent' => undef, 'order' => 1, 'name' => 'rsp', 'children' => [ { 'parent' => $VAR1->[0]{'parent'}{'parent'}, 'order' => 2, 'content' => ' ', 'children' => [], 'type' => 'data' }, $VAR1->[0]{'parent'}, { 'parent' => $VAR1->[0]{'parent'}{'parent'}, 'order' => 5, 'content' => ' ', 'children' => [], 'type' => 'data' } ], 'type' => 'tag', 'attributes' => { 'stat' => 'ok' } }, 'seq_num' => 1, 'name' => 'frob', 'children' => $VAR1, 'seq_count' => 1, 'order' => 3, 'type' => 'tag', 'attributes' => {} }, 'order' => 4, 'content' => '72157604013085297-45646646467d-280706', 'children' => [], 'type' => 'data' } ]; $VAR1 = undef;