Displaying 1 result from an estimated 1 matches for "_get_text".
2006 Jan 31
1
retrieving attributes of searchresults
...gt; $data->{article_id},
'XTITLE' => $title, # arrayref
'XDATE' => $data->{publicationdate},
'XTYPE' => $data->{articletype},
'XTID' => $tid, # arrayref
'XTXC' => $txc, # arrayref
});
my @words = _get_text($data,$title);
for my $i (0 .. $#words) {
my $w = $words[$i]; $w =~ s/[\.-]$//g;
$doc->add_posting($w,++$i) if $w;
}
$db->add_document($doc);
sub _add_attr {
my ($doc,$data) = @_;
for my $k (keys %$data) {
if (ref $data->{$k}) { # arrayref / multivalue field
f...