git-svn-id: svn+ssh://llin/home/dpavlin/private/svn/MARC-Fast/trunk@10
49f9634a-d7ec-0310-8e6b-
ec35c6cc8804
-dump just record C<number>
+dump records starting with C<offset>
-import just first C<limit> records
+dump just C<limit> records
-getopts('dn:l:h', \%opt);
+getopts('do:l:h', \%opt);
-my $file = shift @ARGV || die "usage: $0 [-n number] [-l limit] [-h] [-d] file.marc\n";
+my $file = shift @ARGV || die "usage: $0 [-o offset] [-l limit] [-h] [-d] file.marc\n";
my $marc = new MARC::Fast(
marcdb => $file,
my $marc = new MARC::Fast(
marcdb => $file,