使用Perl从Xapian数据库获取特定数据

Question

我正在编写一个perl脚本来从Xapian数据库中检索搜索结果。

我使用 Search :: Xapian 模块并尝试了基本的Xapian Query Example。这个基本程序允许进行查询并获得按相关性排序的结果数组。我的问题是get_data()方法将文档中的整个数据（url，filname，abstract，author，...）作为字符串混合在一起。

我在CPAN module中搜索了一种方法来逐个获取每个数据，但我找不到它。

是否可以逐个获取文件名，网址，作者，将它们放入特定变量？

Answer 1

您尚未发布代码以生成此代码或您的设置详情。请参阅simplesearch.pl示例，而不是将其打印出来，将您想要的内容分配给变量：

# Display the results.
printf "%i results found.\n", $mset->get_matches_estimated();
printf "Results 1-%i:\n", $mset->size();

foreach my $m ($mset->items()) {
    printf "%i: %i%% docid=%i [%s]\n", $m->get_rank() + 1, $m->get_percent(), $m->get_docid(), $m->get_document()->get_data();
}