A few adjustments

[migration-tools.git] / bibliofile / parse_db.pl

diff --git a/bibliofile/parse_db.pl b/bibliofile/parse_db.pl
index b7b691d..c14f958 100755 (executable)
--- a/bibliofile/parse_db.pl
+++ b/bibliofile/parse_db.pl
@@ -86,7 +86,6 @@ while (read DB, my $data, $blockSize) {
 
     if ($field[0] =~ m/[^\x00]/) {
       print join("\t", @field) . "\n";
-      #print STDERR "Length: $pos\n";
     }
 
   }