DOKK / manpages / debian 12 / libcatmandu-marc-perl / Catmandu::Fix::marc_append.3pm.en
Catmandu::Fix::marc_append(3pm) User Contributed Perl Documentation Catmandu::Fix::marc_append(3pm)

Catmandu::Fix::marc_append - add a value at the end of a MARC field

    # Append a period at the end of the 100 field
    marc_append(100,".")

Append a value at the end of a MARC (sub)field

For each (sub)field matching the MARC_PATH append the VALUE to the last subfield. This value can be a literal or reference an existing field in the record using the dollar JSON_PATH syntax.

This Fix can be used inline in a Perl script:

    use Catmandu::Fix::marc_append as => 'marc_append';
    my $data = { record => [...] };
    $data = marc_append($data, '100', '.');

Catmandu::Fix

2022-09-27 perl v5.34.0