https://github.com/marcspec/marc-spec

MARCspec parser and validator for Perl
https://github.com/marcspec/marc-spec

catmandu library marc marcspec reference-implementation

Last synced: 3 months ago
JSON representation

MARCspec parser and validator for Perl

Host: GitHub
URL: https://github.com/marcspec/marc-spec
Owner: MARCspec
License: other
Created: 2015-09-25T04:56:07.000Z (over 10 years ago)
Default Branch: master
Last Pushed: 2017-12-16T08:28:58.000Z (about 8 years ago)
Last Synced: 2025-10-22T07:54:39.921Z (3 months ago)
Topics: catmandu, library, marc, marcspec, reference-implementation
Language: Perl
Homepage: https://metacpan.org/pod/MARC::Spec
Size: 82 KB
Stars: 2
Watchers: 2
Forks: 4
Open Issues: 0
Metadata Files:
- Readme: README.md
- Changelog: Changes
- License: LICENSE

Awesome Lists containing this project

README

          # NAME

MARC::Spec - A MARCspec parser and builder

# SYNOPSIS

    use MARC::Spec;

    

    # Parsing MARCspec from a string

    my $ms = MARC::Spec::parse('246[0-1]$f{245$h~\[microform\]|245$h~\microfilm}');

    # Structure

    say ref $ms;                                             # MARC::Spec

    say ref $ms->field;                                      # MARC::Spec::Field

    say ref $ms->subfields;                                  # ARRAY

    say ref $ms->subfields->[0];                             # MARC::Spec::Subfield

    say ref $ms->subfields->[0]->subspecs;                   # ARRAY

    say ref $ms->subfields->[0]->subspecs->[0];              # ARRAY

    say ref $ms->subfields->[0]->subspecs->[0]->[1];         # MARC::Spec::Subspec

    say ref $ms->subfields->[0]->subspecs->[0]->[1]->left;   # MARC::Spec

    say ref $ms->subfields->[0]->subspecs->[0]->[1]->right;  # MARC::Spec::Comparisonstring

    # Access to attributes

    say $ms->field->base;                                                    # 246[0-1]

    say $ms->field->tag;                                                     # 246

    say $ms->field->index_start;                                             # 0

    say $ms->field->index_end;                                               # 1

    say $ms->field->index_length;                                            # 2

    say $ms->subfields->[0]->base;                                           # 'f[0-#]'

    say $ms->subfields->[0]->code;                                           # 'f'

    say $ms->subfields->[0]->index_start;                                    # 0

    say $ms->subfields->[0]->index_end;                                      # '#'

    say $ms->subfields->[0]->subspecs->[0]->[0]->subterms;                   # '245$h~\[microform\]'

    say $ms->subfields->[0]->subspecs->[0]->[0]->left->field->tag;           # 245

    say $ms->subfields->[0]->subspecs->[0]->[0]->left->field->index_length;  # -1

    say $ms->subfields->[0]->subspecs->[0]->[0]->left->subfields->[0]->code; # 'h'

    say $ms->subfields->[0]->subspecs->[0]->[0]->right->comparable;          # '[microform]'

    say $ms->subfields->[0]->subspecs->[0]->[1]->right->comparable;          # 'microfilm'

    

    # creating MARCspec from scratch

    my $field    =  MARC::Spec::Field->new('245');

    my $subfield = MARC::Spec::Subfield->new('a');

    my $spec     = MARC::Spec->new($field);

    $spec->add_subfield($subfield);

# DESCRIPTION

MARC::Spec is a [MARCspec - A common MARC record path language](http://marcspec.github.io/MARCspec/) parser and builder.

# FUNCTIONS

## parse(Str)

Parses a MARCspec as string and returns an instance of MARC::Spec.

# METHODS

## new(MARC::Spec::Field)

Create a new MARC::Spec instance. Parameter must be an instance of [MARC::Spec::Field](https://metacpan.org/pod/MARC::Spec::Field).

## add\_subfield(MARC::Spec::Subfield)

Appends a subfield to the array of the attribute subfields. Parameter must be an instance of 

[MARC::Spec::Subfield](https://metacpan.org/pod/MARC::Spec::Subfield).

## add\_subfields(ArrayRef\[MARC::Spec::Subfield\])

Appends subfields to the array of the attribute subfields. Parameter must be an ArrayRef and 

elements must be instances of [MARC::Spec::Subfield](https://metacpan.org/pod/MARC::Spec::Subfield). 

# PREDICATES

## has\_subfields

Returns true if attribute subfields has an value and false otherwise.

## has\_indicator

Returns true if attribute indicator has an value and false otherwise.

# ATTRIBUTES

## field

Obligatory. Attribute field is an instance of [MARC::Spec::Field](https://metacpan.org/pod/MARC::Spec::Field).

## subfields

If defined, subfields is an array of instances of [MARC::Spec::Subfield](https://metacpan.org/pod/MARC::Spec::Subfield).

## indicator

If defined, indicator is an instance of [MARC::Spec::Indicator](https://metacpan.org/pod/MARC::Spec::Indicator).

# AUTHOR

Carsten Klee ``

# CONTRIBUTORS

- Johann Rolschewski, ``

# COPYRIGHT AND LICENSE

This software is copyright (c) 2016 by Carsten Klee.

This is free software; you can redistribute it and/or modify it under

the same terms as the Perl 5 programming language system itself.

# BUGS

Please report any bugs to [https://github.com/MARCspec/MARC-Spec/issues](https://github.com/MARCspec/MARC-Spec/issues)

# SEE ALSO

- [MARC::Spec::Field](https://metacpan.org/pod/MARC::Spec::Field)

- [MARC::Spec::Subfield](https://metacpan.org/pod/MARC::Spec::Subfield)

- [MARC::Spec::Indicator](https://metacpan.org/pod/MARC::Spec::Indicator)

- [MARC::Spec::Subspec](https://metacpan.org/pod/MARC::Spec::Subspec)

- [MARC::Spec::Structure](https://metacpan.org/pod/MARC::Spec::Structure)

- [MARC::Spec::Comparisonstring](https://metacpan.org/pod/MARC::Spec::Comparisonstring)

- [MARC::Spec::Parser](https://metacpan.org/pod/MARC::Spec::Parser)

ecosyste.ms

Data

Tools

Indexes

Applications

Experiments

Awesome

https://github.com/marcspec/marc-spec

Awesome Lists containing this project

README