Catmandu-OAI
view release on metacpan or search on metacpan
lib/Catmandu/Importer/OAI.pm view on Meta::CPAN
sub { $self->oai->ListIdentifiers( %args , onRecord => $fill_stack ); } :
sub { $self->oai->ListRecords( %args , onRecord => $fill_stack ); };
my $res = $self->_retry( $sub );
if (defined $res->resumptionToken) {
$resumptionToken = $res->resumptionToken->resumptionToken;
$resumptionData->{token} = $resumptionToken;
$resumptionData->{expirationDate} = $res->resumptionToken->expirationDate;
$resumptionData->{completeListSize} = $res->resumptionToken->completeListSize;
$resumptionData->{cursor} = $res->resumptionToken->cursor;
}
else {
$resumptionToken = undef;
}
unless (defined $resumptionToken && length $resumptionToken) {
$done = 1;
}
if ($self->sleep) {
( run in 0.248 second using v1.01-cache-2.11-cpan-4d50c553e7e )