X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;ds=sidebyside;f=perl%2Fcluster.pl;h=a11626a233479cc7fa5885fb9870c4513782e5a7;hb=77764988d275c1f8b650f5a103ec7147d8a5d966;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