X-Git-Url: http://git.rot13.org/?p=Biblio-Isis;a=blobdiff_plain;f=scripts%2Fdump_isisdb.pl;fp=scripts%2Fdump_isisdb.pl;h=0a5fb5132ddd4f63c838e127679f2ebc60ea07ab;hp=adbc250232aa70d7b1af165e9645cabdc697c300;hb=c9611dfe337a4eb721fba8629672c725d7bec729;hpb=e283063d7c8cd0fb14cf269a5373141629650536 diff --git a/scripts/dump_isisdb.pl b/scripts/dump_isisdb.pl index adbc250..0a5fb51 100755 --- a/scripts/dump_isisdb.pl +++ b/scripts/dump_isisdb.pl @@ -16,9 +16,9 @@ my $isis = IsisDB->new ( # read_fdt => 1, ); -print "rows: ",$isis->{'maxmfn'},"\n\n"; +print "rows: ",$isis->count,"\n\n"; -for(my $mfn = 1; $mfn <= $isis->{'maxmfn'}; $mfn++) { +for(my $mfn = 1; $mfn <= $isis->count; $mfn++) { print STDERR Dumper($isis->to_hash($mfn)),"\n" if ($debug); print $isis->to_ascii($mfn),"\n";