use strict;
use XML::Twig;
-use DBM::Deep;
use Equinox::Migration::SubfieldMapper 1.004;
mods => \@mods );
# initialize datastore
- #die "Datastore file 'EMMXSSTORAGE.dbmd' already exists. Exiting.\n"
- # if (-e "EMMXSSTORAGE.dbmd");
- #$dstore = DBM::Deep->new( file => "EMMXSSTORAGE.dbmd",
- # max_buckets => 64,
- # #data_sector_size => 256,
- # autoflush => 0,
- # );
$dstore = {};
$reccount = 0; # next record ptr
$dstore->{tags} = $sfmap->tags; # list of all tags