Arbre :: multinode Classement & Résumé
- Licence:
- Perl Artistic License
- Nom de l'éditeur:
- Kyle R. Burton, Daniel X. Pape and Eric Joanis
- Site Internet de l'éditeur:
- http://search.cpan.org/~krburton/
Arbre :: multinode Mots clés
Arbre :: multinode La description
Un objet arborescent multi-nuds. Arbre :: Multinode est un objet d'arborescence multi-nuds. Plus utile pour la modélisation des structures de données héritachiennes.Synopsis Utilisez l'arborescence :: multinode; utiliser strict; utiliser des avertissements; mon arbre $ = nouvel arbre :: multinode; My $ gérer = nouvel arbre :: multinode :: poignée (arbre $); $ gérer-> set_key ("haut"); $ gérer-> set_value ("niveau"); $ gérer-> add_child ("enfant", "1"); $ gérer-> add_child ("enfant", "2"); $ gérer-> premier (); $ gérer-> vers le bas (); $ gérer-> add_child ("petit-enfant", "1-1"); $ gérer-> up (); $ gérer-> dernier (); $ gérer-> vers le bas (); $ gérer-> add_child ("petit-enfant", "2-1"); $ gérer-> up (); $ gérer-> top (); bupp_tree ($ gérer); ma plus profondeur = 0; Sub Dumk_tree {++ $ de profondeur; mon $ gérer = shift; mon $ plomb = '' x ($ de profondeur * 2); ma ($ clé, $ val); ($ clé, $ val) = $ gérer-> get_data (); Imprimer $ plomb, "clé: $ clé "; Imprimer $ plomb," Val: $ val "; impression $ plomb," profondeur: $ approfondie "; ma $ i; pour ($ i = 0; $ i enfants); ++ $ i) {$ gérer-> down ($ i); $ handle- > up ();} - $ de profondeur;} arbre :: multinode, arborescence :: multinode :: nud et multinode :: la poignée sont des objets modélisés après la classe C ++ que j'avais écrite pour m'aider à des informations héritachiques telles que des données de données (telles que Comme les relations entre enregistrements dans une SGBBM). L'arborescence est fondamentalement une liste des listes Type Structure de données, où chaque nud a une clé, une valeur et une liste d'enfants. L'arborescence n'a pas de tri interne, bien que toutes les opérations persiste Ordre des nuds enfants. Exigences: · Perl
Arbre :: multinode Logiciels associés