NAME

MARC::Convert::Wikidata::Object::Kramerius - Bibliographic Wikidata object for Kramerius link by MARC record.

SYNOPSIS

use MARC::Convert::Wikidata::Object::Kramerius;

my $obj = MARC::Convert::Wikidata::Object::Kramerius->new(%params);
my $kramerius_id = $obj->kramerius_id;
my $object_id = $obj->object_id;
my $url = $obj->url;

METHODS

new

my $obj = MARC::Convert::Wikidata::Object::Kramerius->new(%params);

Constructor.

• kramerius_id

  Kramerius system id.

  Parameter is optional.

  Default value is undef.

• object_id

  Kramerius system object id.

  Parameter is optional.

  Default value is undef.

• url

  URL of Kramerius link.

  Parameter is optional.

  Default value is undef.

Returns instance of object.

kramerius_id

my $kramerius_id = $obj->kramerius_id;

Get Kramerius system id.

Returns string.

object_id

my $object_id = $obj->object_id;

Get Kramerius system object id.

Returns string.

url

my $url = $obj->url;

Get Kramerius system object url.

Returns string.

EXAMPLE1

use strict;
use warnings;

use Data::Printer;
use MARC::Convert::Wikidata::Object::Kramerius;

my $obj = MARC::Convert::Wikidata::Object::Kramerius->new(
        'kramerius_id' => 'mzk',
        'object_id' => '814e66a0-b6df-11e6-88f6-005056827e52',
        'url' => 'https://www.digitalniknihovna.cz/mzk/view/uuid:814e66a0-b6df-11e6-88f6-005056827e52',
);

p $obj;

# Output:
# MARC::Convert::Wikidata::Object::Kramerius  {
#     parents: Mo::Object
#     public methods (0)
#     private methods (0)
#     internals: {
#         kramerius_id   "mzk",
#         object_id      "814e66a0-b6df-11e6-88f6-005056827e52" (dualvar: 8.14e+68),
#         url            "https://www.digitalniknihovna.cz/mzk/view/uuid:814e66a0-b6df-11e6-88f6-005056827e52"
#     }
# }

DEPENDENCIES

Mo.

SEE ALSO

MARC::Convert::Wikidata

Conversion class between MARC record and Wikidata object.

REPOSITORY

https://github.com/michal-josef-spacek/MARC-Convert-Wikidata-Object

AUTHOR

Michal Josef Špaček mailto:skim@cpan.org

http://skim.cz

LICENSE AND COPYRIGHT

© Michal Josef Špaček 2021-2025

BSD 2-Clause License

VERSION

0.15

cpanm MARC::Convert::Wikidata::Object

perl -MCPAN -e shell
install MARC::Convert::Wikidata::Object