print number of rows

git-svn-id: file:///home/dpavlin/svn/Biblio-Isis/trunk@4 4670fa4d-42ec-0310-ab5b-a66af6943492

diff --git a/scripts/dump_isis.pl b/scripts/dump_isis.pl
index 5e2942d..b4ea742 100755 (executable)
--- 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";