NAME

       SRU::Server - Respond to SRU requests via CGI::Application

SYNOPSIS

           package MySRU;

           use base qw( SRU::Server );

           sub explain {
               my $self = shift;

               # $self->request isa SRU::Request::Explain
               # $self->response isa SRU::Response::Explain
           }

           sub scan {
               my $self = shift;

               # $self->request isa SRU::Request::Scan
               # $self->response isa SRU::Response::Scan
               # $self->cql is the root node of a CQL::Parser-parsed query
           }

           sub searchRetrieve {
               my $self = shift;

               # $self->request isa SRU::Request::SearchRetrieve
               # $self->response isa SRU::Response::SearchRetrieve
               # $self->cql is the root node of a CQL::Parser-parsed query
           }

           package main;

           MySRU->new->run;

DESCRIPTION

       This module brings together all of the SRU verbs (explain, scan and searchRetrieve) under
       a sub-classable object based on CGI::Application.

METHODS

   explain
       This method is used to return an explain response. It is the default method.

   scan
       This method returns a scan response.

   searchRetrieve
       This method returns a searchRetrieve response.

CGI::APPLICATION METHODS

   setup
       Sets the "run_modes", "mode_param" and the default runmode (explain).

   cgiapp_prerun
       Parses the incoming SRU request and if needed, checks the CQL query.

   cgiapp_postrun
       Sets the content type (text/xml) and serializes the response.

   error_mode
       Stub error runmode.

AUTHORS

       •   Brian Cassidy <bricas@cpan.org>

       •   Ed Summers <ehs@pobox.com>

       •   Jakob Voss <voss@gbv.de>

COPYRIGHT AND LICENSE

       This software is copyright (c) 2013 by Ed Summers.

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