X-Git-Url: http://www.dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXDupe.pm;h=851e3a6953eef03450020f399a9efa2b4b17f42f;hb=7b9256ceade8b18b48f848c9ac659c2de7322b0b;hp=a5bb8a1b9cd762f9d4bdd0e1e2208f07743ba244;hpb=20b7b2238bdb8441edde3cb1f55d801300016697;p=spider.git diff --git a/perl/DXDupe.pm b/perl/DXDupe.pm index a5bb8a1b..851e3a69 100644 --- a/perl/DXDupe.pm +++ b/perl/DXDupe.pm @@ -19,9 +19,6 @@ $default = 48*24*60*60; $lasttime = 0; $fn = "$main::data/dupefile"; -use vars qw($VERSION $BRANCH); -($VERSION, $BRANCH) = dxver(q$Revision$); - sub init { $dbm = tie (%d, 'DB_File', $fn);