diff --git a/lib/SLUB/LZA/SIPBuilderBagIt.pm b/lib/SLUB/LZA/SIPBuilderBagIt.pm index 40b42bf756c02ca2dd2a84f7ec78e6cd555d7837..4a19c88bed220bf6c31034e37fb8516b46a20da8 100644 --- a/lib/SLUB/LZA/SIPBuilderBagIt.pm +++ b/lib/SLUB/LZA/SIPBuilderBagIt.pm @@ -59,6 +59,12 @@ use Path::Tiny; use Term::ANSIColor; # colored print use XML::LibXML; use XML::XPath; +our $VERSION=2021.2; +# version of SIP, +# see L<https://slubarchiv.slub-dresden.de/technische-standards-fuer-die-ablieferung-von-digitalen-dokumenten>, +# document "SIP Spezifikation für automatischen Ingest SLUBArchiv (v2.0.1)" for details +my $sipVersion='v2020.1'; + our $with_debug = 0; # output debug infos and files # catalogue infos @@ -78,6 +84,10 @@ my $marc21_to_baginfo_mappings = [ { tag => "246", code => "b", key => "Title" }, ]; +sub get_sip_version { + return $sipVersion; +} + sub add_metadata($refAddBagInfo, $ppn, $noppn, $marc21) { # adding entries to bag-info key list push @{$refAddBagInfo}, {'External-Identifier' => "PPN:$ppn"} unless (! $ppn);