The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Catmandu::Importer::MAB2 - Package that imports MAB2 data

VERSION

version 0.01

SYNOPSIS

    use Catmandu::Importer::MAB2;

    my $importer = Catmandu::Importer::MAB2->new(file => "./t/mab2.dat", type=> "RAW");

    my $n = $importer->each(sub {
        my $hashref = $_[0];
        # ...
    });

NAME

Catmandu::Importer::MAB2 - Package that imports MAB2 data

MAB2

The parsed MAB2 is a HASH containing two keys '_id' containing the 001 field (or the system identifier of the record) and 'record' containing an ARRAY of ARRAYs for every field:

 {
  'record' => [
                [
                    '001',
                    ' ',
                    '_',
                    'fol05882032 '
                ],
                [
                    245,
                    'a',
                    'a',
                    'Cross-platform Perl /',
                    'c',
                    'Eric F. Johnson.'
                ],
        ],
  '_id' => 'fol05882032'
 } 

METHODS

new(file => $filename,type=>$type,[id=>$id_field])

Create a new MAB2 importer for $filename. Use STDIN when no filename is given. Type describes the sytax of the MAB records. Currently we support: RAW and XML.

Optionally provide an 'id' option pointing to the identifier field of the MAB record (default 001).

count

each(&callback)

...

Every Catmandu::Importer is a Catmandu::Iterable all its methods are inherited. The Catmandu::Importer::MAB methods are not idempotent: MAB feeds can only be read once.

SEE ALSO

Catmandu::Importer, Catmandu::Iterable;

AUTHOR

Johann Rolschewski <rolschewski@gmail.com>

COPYRIGHT AND LICENSE

This software is copyright (c) 2013 by Johann Rolschewski.

This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.