使用perl的关键字树构造

Question

我想用perl编程构造一个关键字树。以下是关键字“Apple，Apropos，Banana，Bandana，Orange”中关键字树的示例。

这是我第一次上用perl树工作。而且，当我在perl中搜索关键字树时，我找不到足够的信息。我不期待完整的代码。只要说出完成任务的起点即可。这会帮助我很多。

在此先感谢。

Answer 1

这种数据结构通常被称为一个字典树，并寻找其产生Tree::Trie。如果你正在寻找实现你自己的想法的想法，可以看看源代码。

Answer 2

您可以使用哈希引用这个问题是这样的：

use strict; 
use Data::Dumper; 

my $tree = { 
    root => { 
     a => { 
      p => { 
       p => 'etc' , 
       r => 'etc' 
      }, 
     }, 
     b => { 
      a => 'etc' 
     }, 
     o => { 
      r => 'etc' 
     }, 
    }, 
}; 

print Dumper($tree); 

或者一些CPAN模块：http://search.cpan.org/search?mode=all&query=tree