Codebase list libmarc-spec-perl / HEAD
HEAD

Tree @HEAD (Download .tar.gz) 

  1
  2
  3
  4
  5
  6
  7
  8
  9
 10
 11
 12
 13
 14
 15
 16
 17
 18
 19
 20
 21
 22
 23
 24
 25
 26
 27
 28
 29
 30
 31
 32
 33
 34
 35
 36
 37
 38
 39
 40
 41
 42
 43
 44
 45
 46
 47
 48
 49
 50
 51
 52
 53
 54
 55
 56
 57
 58
 59
 60
 61
 62
 63
 64
 65
 66
 67
 68
 69
 70
 71
 72
 73
 74
 75
 76
 77
 78
 79
 80
 81
 82
 83
 84
 85
 86
 87
 88
 89
 90
 91
 92
 93
 94
 95
 96
 97
 98
 99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
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.

 add_subfield(MARC::Spec::Subfield)

    Appends a subfield to the array of the attribute subfields. Parameter
    must be an instance of 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.

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.

 subfields

    If defined, subfields is an array of instances of MARC::Spec::Subfield.

 indicator

    If defined, indicator is an instance of MARC::Spec::Indicator.

AUTHOR

    Carsten Klee <klee at cpan.org>

CONTRIBUTORS

      * Johann Rolschewski, <jorol at cpan>

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

SEE ALSO

      * MARC::Spec::Field

      * MARC::Spec::Subfield

      * MARC::Spec::Indicator

      * MARC::Spec::Subspec

      * MARC::Spec::Structure

      * MARC::Spec::Comparisonstring

      * MARC::Spec::Parser

Commit History @HEAD