HTTP::OAI::Repository(3pm) | User Contributed Perl Documentation | HTTP::OAI::Repository(3pm) |
HTTP::OAI::Repository - Documentation for building an OAI compliant repository using OAI-PERL
Using the OAI-PERL library in a repository context requires the user to build the OAI responses to be sent to OAI harvesters.
use HTTP::OAI::Harvester; use HTTP::OAI::Metadata::OAI_DC; use XML::SAX::Writer; use XML::LibXML; # (all of these options _must_ be supplied to comply with the OAI protocol) # (protocolVersion and responseDate both have sensible defaults) my $r = new HTTP::OAI::Identify( baseURL=>'http://yourhost/cgi/oai', adminEmail=>'youremail@yourhost', repositoryName=>'agoodname', requestURL=>self_url() ); # Include a description (an XML::LibXML Dom object) $r->description(new HTTP::OAI::Metadata(dom=>$dom)); my $r = HTTP::OAI::Record->new( header=>HTTP::OAI::Header->new( identifier=>'oai:myrepo:10', datestamp=>'2004-10-01' ), metadata=>HTTP::OAI::Metadata::OAI_DC->new( dc=>{title=>['Hello, World!'],description=>['My Record']} ) ); $r->about(HTTP::OAI::Metadata->new(dom=>$dom)); my $output; my $w = XML::SAX::Writer->new(Output=>\$output); my $driver = HTTP::OAI::SAX::Driver->new( Handler => my $builder = XML::LibXML::SAX::Builder->new() ); $driver->start_oai_pmh(); $r->set_handler($w); $r->generate($driver); $driver->end_oai_pmh(); my $xml = $builder->result;
The validation scripts included in this module provide the repository admin with a number of tools for helping with being OAI compliant, however they can not be exhaustive in themselves.
e.g:
my $r = validate_request(%paramlist); print header(-status=>$r->code.' '.$r->message), $r->error_as_HTML;
Note that validate_request attempts to be as strict to the Protocol as possible.
See the bin/gateway.pl for an example implementation (it's actually for creating a static repository gateway, but you get the idea!).
2018-12-22 | perl v5.28.1 |