X-Git-Url: http://git.rot13.org/?p=Biblio-Isis;a=blobdiff_plain;f=scripts%2Fdump_isis.pl;fp=scripts%2Fdump_isis.pl;h=b4ea74211bc40be2ab0485595ffcb4c3b51f1d7e;hp=5e2942d412faea3f94bfe54af789d9ef393af812;hb=940c77ad4bb1f3f03f44a41e6766e783170c5952;hpb=2cf4e5db8ee82b0e340923c83805f07248b54a91 diff --git a/scripts/dump_isis.pl b/scripts/dump_isis.pl index 5e2942d..b4ea742 100755 --- a/scripts/dump_isis.pl +++ b/scripts/dump_isis.pl @@ -10,6 +10,8 @@ my $isis = IsisDB->new ( isisdb => '/data/isis_data/ps/LIBRI/LIBRI', ); +print "rows: ",$isis->{'maxmfn'},"\n\n"; + for(my $mfn = 1; $mfn <= $isis->{'maxmfn'}; $mfn++) { print $isis->to_ascii($mfn),"\n";