NAME

Catmandu::Exporter::MAB2 - Package that exports MAB2 data

VERSION

version 0.05

SYNOPSIS

   use Catmandu::Exporter::MAB2;

   my $exporter = Catmandu::Exporter::MAB2->new(file => "mab2.dat", type => "RAW");
   my $data = {
    record => [
       ...
       [245, '1', 'a', 'Cross-platform Perl /', 'c', 'Eric F. Johnson.'],
       ...
       ],
   };

   $exporter->add($data);
   $exporter->commit;

NAME

Catmandu::Exporter::MAB2 - serialize parsed MAB2 data

Arguments

file

Path to file with MAB2 records.

fh

Open filehandle for file with MAB2 records.

type

Specify type of MAB2 records: Disk (Diskette), RAW (Band), XML. Default: 001. Optional.

xml_declaration

Write XML declaration. Set to 0 or 1. Default: 0. Optional.

collection

Wrap records in collection element (<datei>). Set to 0 or 1. Default: 0. Optional.

METHODS

new(file => $file | fh => $filehandle [, type => XML, xml-declaration => 1, collection => 1])

Create a new Catmandu MAB2 exports which serializes into a $file.

add($data)

Add record to exporter.

commit()

Close collection (optional) and filehandle.

SEE ALSO

Catmandu::Exporter, 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.