MARC::Crosswalk::DublinCore(3) Convert data between MARC and Dublin Core

SYNOPSIS


my $crosswalk = MARC::Crosswalk::DublinCore->new;

# Convert a MARC record to Dublin Core (simple)
my $marc = MARC::Record->new_from_usmarc( $blob );
my $dc = $crosswalk->as_dublincore( $marc );
# Convert simple DC to MARC
$marc = $crosswalk->as_marc( $dc );

# Convert MARC to qualified DC instead
$crosswalk->qualified( 1 );
$dc = $crosswalk->as_dublincore( $marc );

DESCRIPTION

This module provides an implentation of the LOC's spec on how to convert metadata between MARC and Dublin Core format. The spec for converting MARC to Dublin Core is available at: http://www.loc.gov/marc/marc2dc.html, and from DC to MARC: http://www.loc.gov/marc/dccross.html.

NB: The conversion cannot be done in a round-trip manner. i.e. Doing a conversion from MARC to DC, then trying to go back to MARC will not yield the original record.

INSTALLATION

To install this module via Module::Build: 

        perl Build.PL
        ./Build         # or `perl Build`
        ./Build test    # or `perl Build test`
        ./Build install # or `perl Build install`

To install this module via ExtUtils::MakeMaker: 

        perl Makefile.PL
        make
        make test
        make install

METHODS

new( %options )

Creates a new crosswalk object. You can pass the ``qualified'' option (true/false) as well. 

        # DC Simple
        $crosswalk = MARC::Crosswalk::DublinCore->new;
        # DC Qualified
        $crosswalk = MARC::Crosswalk::DublinCore->new( qualified => 1 );

qualified( $qualified )

Allows you to specify if qualified Dublin Core should be used in the input or output. Defaults to false (DC simple). 

        # DC Simple
        $crosswalk->qualified( 0 );
        # DC Qualified
        $crosswalk->qualified( 1 );

as_dublincore( $marc )

convert a MARC::Record to a DublinCore::Record.

as_marc( $dublincore )

convert a DublinCore::Record to a MARC::Record. NB: Not yet implemented.

TODO

  • Implement as_marc()
  • add tests

AUTHOR

COPYRIGHT AND LICENSE

Copyright 2005 by Brian Cassidy

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

LAST SEARCHED