NAME

SWISH::Prog::Searcher - base searcher class

SYNOPSIS

my $searcher = SWISH::Prog::Searcher->new(
                   invindex        => 'path/to/index',
                   query_class     => 'SWISH::Prog::Query',
                   query_parser    => $swish_prog_queryparser,
                   config          => $swish_prog_config,
                   max_hits        => 100,
                   sort_order      => 'swishrank',
               );
               
my $results = $searcher->search( 'foo bar' );
while (my $result = $results->next) {
    printf("%4d %s\n", $result->score, $result->uri);
}

DESCRIPTION

SWISH::Prog::Searcher is a base searcher class. It defines the APIs that all SWISH::Prog storage backends adhere to in returning results from a SWISH::Prog::InvIndex.

METHODS

init

search( query )

Returns a SWISH::Prog::Results object.

check_query( query )

Utility method, intended to be called from search().

Example:

sub search {
    my $self = shift;
    my $args = $self->check_query(@_);
    # $self->query now guaranteed to contain a Query object.
}

AUTHOR

Peter Karman, <perl@peknet.com>

COPYRIGHT AND LICENSE

Copyright (C) 2008 by Peter Karman

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.