X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2Fgen_usdb_data.pl;h=cc2850cf693fa6c6c9f1bf04f17cc0ef0de2e5c5;hb=78f7e0cc760aee1a38c38c83187fc050576dfb14;hp=153a560153b5ab025e503d2a92e845f707372b5c;hpb=08912ec52dee25bbe00aef10387e1822dcd574bc;p=spider.git diff --git a/perl/gen_usdb_data.pl b/perl/gen_usdb_data.pl index 153a5601..cc2850cf 100755 --- a/perl/gen_usdb_data.pl +++ b/perl/gen_usdb_data.pl @@ -55,12 +55,12 @@ my $blksize = 1024 * 1024; STDOUT->autoflush(1); -my $dbrawfn = "$main::data/usdbraw"; +my $dbrawfn = "$main::data/usdbraw.gz"; rename "$dbrawfn.oo", "$dbrawfn.ooo"; rename "$dbrawfn.o", "$dbrawfn.oo"; rename "$dbrawfn", "$dbrawfn.o"; -my $gzfh = gzopen($dbrawfn, "wb9") or die "Cannot open $dbrawfn $!"; +my $gzfh = gzopen($dbrawfn, "wb") or die "Cannot open $dbrawfn $!"; my $ctycount;