MAB2::Writer::Disk(3pm) | User Contributed Perl Documentation | MAB2::Writer::Disk(3pm) |
NAME¶
MAB2::Writer::Disk - MAB2 Diskette format serializerSYNOPSIS¶
MAB2::Writer::Disk is a MAB2 Diskette serializer.use MAB2::Writer::Disk; my @mab_records = ( [ ['001', ' ', '_', '2415107-5'], ['331', ' ', '_', 'Code4Lib journal'], ['655', 'e', 'u', 'http://journal.code4lib.org/', 'z', 'kostenfrei'], ... ], { record => [ ['001', ' ', '_', '2415107-5'], ['331', ' ', '_', 'Code4Lib journal'], ['655', 'e', 'u', 'http://journal.code4lib.org/', 'z', 'kostenfrei'], ... ] } ); $writer = MAB2::Writer::Disk->new( fh => $fh ); foreach my $record (@mab_records) { $writer->write($record); }
Arguments¶
- "subfield_indicator"
- Set subfield separator. Default: INFORMATION SEPARATOR ONE. Optional.
See also MAB2::Writer::Handle.
METHODS¶
new(file => $file | fh => $fh [, encoding => 'UTF-8', subfield_separator => '$'])¶
_write_record($record)¶
SEEALSO¶
MAB2::Writer::Handle, Catmandu::Exporter.AUTHOR¶
Johann Rolschewski <jorol@cpan.org>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.
2017-10-27 | perl v5.26.1 |