Perl에서 Text :: DocumentCollection을 사용하여 문서 추가

Question

Text::DocumentCollection을 Perl에서 사용하려고합니다. 파일 핸들에서 텍스트를 읽고이 텍스트에서 문서 콜렉션을 구성 할 수 있기를 원하지만이 모듈의 의도 된 사용인지 확실하지 않습니다.

문서에 "문서"를 추가하는 것에 대한 설명이 있지만 문서가 무엇인지 확실하지 않습니다. 파일인가요? 변수의 문자열 일 수 있습니까?

다음 코드는 오류를 반환합니다

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. 

는 "로드"무엇에 "패키지"입니다 무엇을 의미 하는가?

Answer 1

CPAN 배포에 포함 된 테스트에서 Add 메서드의 두 번째 인수는 Text::Document 개체에 대한 참조 여야하며 간단한 문자열이 아니어야합니다. 예를 들어

, 감사

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);