Catmandu::Store::AlephX(3pm) | User Contributed Perl Documentation | Catmandu::Store::AlephX(3pm) |
Catmandu::Store::AlephX - A Catmandu AlephX service implemented as Catmandu::Store
use Catmandu::Store::AlephX; my $store = Catmandu::Store::AlephX->new(url => 'http://aleph.ugent.be/X' , username => 'XXX' , password => 'XXX'); $store->bag('usm01')->each(sub { });
Retrieves a record from the Aleph database. Requires a record identifier. Returns a Catmandu MARC record when found and undef on failure.
Adds or updates a record to the Aleph database. Requires a Catmandu type MARC record and a _id field containing the Aleph record number. This method with throw an error when an add cant be executed.
example
#add new record. WARNING: Aleph will ignore the 001 field, my $new_record = eval { $bag->add({ record => [ [ 'FMT', '', '', '_', 'SE' ], [ 'LDR', '', '', '_', '00000cas^^2200385^a^4500' ], [ '001', '', '', '_', '000000444' ], [ '005', '', '', '_', '20140212095615.0' ] .. ] }); }; if ($@) { die "add failed $@"; } say "new record:".$record->{_id};
Deletes a record from the Aleph database. Requires a record identifier. Returns a true value when the record is deleted.
Loops over all records in the Aleph database executing callback for every record.
Not implemented
Not implemented
Not implemented
Catmandu::Store
2023-02-02 | perl v5.36.0 |