X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2Fcluster.pl;h=a11626a233479cc7fa5885fb9870c4513782e5a7;hb=3298d47dabb1251d9906aca6b5158b405f29383f;hp=a126b20b8f91c7cb4efa62b1db9673f08ee10344;hpb=4470e513c0285d0fceb43299bcbe67d7e12c45d5;p=spider.git diff --git a/perl/cluster.pl b/perl/cluster.pl index a126b20b..a11626a2 100755 --- a/perl/cluster.pl +++ b/perl/cluster.pl @@ -38,7 +38,6 @@ BEGIN { close CLLOCK; } - use Msg; use DXVars; use DXDebug; @@ -79,7 +78,7 @@ package main; @inqueue = (); # the main input queue, an array of hashes $systime = 0; # the time now (in seconds) -$version = "1.45"; # the version no of the software +$version = "1.47"; # the version no of the software $starttime = 0; # the starting time of the cluster $lockfn = "cluster.lock"; # lock file name @outstanding_connects = (); # list of outstanding connects