X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXDupe.pm;h=851e3a6953eef03450020f399a9efa2b4b17f42f;hb=05bed9a172a48255aff58f64ab01df58a4d87891;hp=a5bb8a1b9cd762f9d4bdd0e1e2208f07743ba244;hpb=011ea517c23d99f17495e50ae05c183bb21fe50f;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);