X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2Fcluster.pl;h=30f815418acdc00d3d640ac3aa2ee3050985483a;hb=d16a47c69c71370281d87c975bc6089d976eaa7b;hp=706ee54861357c0a7768ba97f09f2da52fccb773;hpb=bd67cc5f4c14f9bb80e609bb971f0a4dd7c44197;p=spider.git diff --git a/perl/cluster.pl b/perl/cluster.pl index 706ee548..30f81541 100755 --- a/perl/cluster.pl +++ b/perl/cluster.pl @@ -20,9 +20,6 @@ BEGIN { unshift @INC, "$root/perl"; # this IS the right way round! unshift @INC, "$root/local"; - -# require Exporter; -# $Exporter::Verbose = 1; } use Msg; @@ -52,7 +49,7 @@ package main; @inqueue = (); # the main input queue, an array of hashes $systime = 0; # the time now (in seconds) -$version = "1.17"; # the version no of the software +$version = "1.22"; # the version no of the software $starttime = 0; # the starting time of the cluster # handle disconnections