view release on metacpan or  search on metacpan

lib/MARC/Record/Generic.pm  view on Meta::CPAN

__END__
=head1 NAME

MARC::Record::Generic - Convert between MARC::Record objects and
native Perl primitives.

=head1 SYNOPSIS

 use MARC::Record::Generic;

 my $record = MARC::Record->new_from_generic( $marcdata );
 $marcdata = $record->as_generic;

=head1 DESCRIPTION

This module provides routines for converting between MARC::Record objects
and Perl native data in the format of:

 my $marcdata = {
   leader => '01109cam a2200349 a 4500',
   fields => [
     '001',
     '   89009461 //r92',
     '005',
     '19991006093052.0',
     '008',
     '991006s1989    nyuaf   bb    00110aeng  ',
     '010',
     {

lib/MARC/Record/Generic.pm  view on Meta::CPAN

=item *

MARC::Record::as_generic( )

An instance method for a MARC::Record object. Returns the objects
values as Perl primitives.

=item *

MARC::Record::new_from_generic( $marcdata )

A package method of MARC::Record which applies the values contained
in C<$data> to the object which it returns.

=back

=head1 SEE ALSO

Code inspired by Frederic Demians' MARC::Moose::Formater::JSON.