Catmandu-OAI
view release on metacpan or search on metacpan
lib/Catmandu/Importer/OAI.pm view on Meta::CPAN
Catmandu::Util::require_package('Catmandu::XML::Transformer')
->new( stylesheet => $_[0] )
} or croak $@;
}
sub _build_oai {
my ($self) = @_;
my $agent = HTTP::OAI::Harvester->new(baseURL => $self->url, resume => 0, keep_alive => 1);
if( $self->has_username && $self->has_password ) {
my $uri = URI->new( $self->url );
my @credentials = (
$uri->host_port,
$self->realm || undef,
$self->username,
$self->password
);
$agent->credentials( @credentials );
}
$agent->env_proxy;
$agent;
}
sub _xml_handler_for_node {
my ( $self, $node ) = @_;
my $ns = $node->namespaceURI();
my $type;
( run in 0.274 second using v1.01-cache-2.11-cpan-4d50c553e7e )