XXX: The Fun Never Stops

• Tree::DAG_Node::XPath

  • XPath for generic trees
  • fun too, because the model is also different
  • need to return blessed objects for attributes
  • need to return a fake object above the root
    • sub getParentNode { my $node= shift; return $node->mother || Tree::DAG_Node::XPath::Root->new( $node); }