Plucene 1.25

Plucene is a Perl port of the Lucene search engine.

SYNOPSIS

Create Documents by adding Fields:

my $doc = Plucene::Document->new;
$doc->add(Plucene::Document::Field->Text(content => $content));
$doc->add(Plucene::Document::Field->Text(author => "Your Name"));

Choose Your Analyser and add documents to an Index Writer

my $analyzer = Plucene::Analysis::SimpleAnalyzer->new();
my $writer = Plucene::Index::Writer->new("my_index", $analyzer, 1);

$writer->add_document($doc);
undef $writer; # close

Search by building a Query

my $parser = Plucene::QueryParser->new({
analyzer => Plucene::Analysis::SimpleAnalyzer->new(),
default => "text" # Default field for non-specified queries
});
my $query = $parser->parse(author:"Your Name");

Then pass the Query to an IndexSearcher and collect hits

my $searcher = Plucene::Search::IndexSearcher->new("my_index");

my @docs;
my $hc = Plucene::Search::HitCollector->new(collect => sub {
my ($self, $doc, $score) = @_;
push @docs, $searcher->doc($doc);
});

$searcher->search_hc($query => $hc);