在Perl中添加Text :: DocumentCollection的文档

时间:2011-12-07 19:00:22

标签: perl

我正在尝试在Perl中使用Text::DocumentCollection。我希望能够从文件句柄中读取文本并从该文本构造文档集合,尽管我不确定这是否是该模块的预期用途。

文档是指添加“文档”,但我不确定文档是什么。它是文件吗?它可以是变量中的字符串吗?

以下代码返回错误:

use Text::DocumentCollection;

my $c = Text::DocumentCollection->new( file => 'test.db' );
$doc = 'test_doc';
$c->Add( 'doc1', $doc );

错误:

Can't locate object method "WriteToString" via package "test_doc" 
(perhaps you forgot to load "test_doc"?) at ...DocumentCollection.pm line 62.

“加载”是什么意思,什么是“包”?

1 个答案:

答案 0 :(得分:2)

从CPAN发行版附带的测试中,Add方法的第二个参数看起来应该是对Text::Document对象的引用,而不是简单的字符串。

例如,来自t/collection.t

use Text::DocumentCollection;
use Text::Document;

my $d1 = Text::Document->new();
$d1->AddContent( ' danelle folta michelle pfeiffer ' );

my $d2 = Text::Document->new();
$d2->AddContent( ' danelle folta mary elizabeth mastrantonio ' );

my $c = Text::DocumentCollection->new( file => 't/collection.db');

$c->Add( 'a', $d1 );
$c->Add( 'b', $d2 );