X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2Fconsole.pl;h=663618080dc1a69e444c6251d954cfcd0177a889;hb=83445c4f6ec6c885260944a9abe648aced399c40;hp=720d25752f92b2a2f21319029eb67ee7afa8aed9;hpb=4b49fe47b37249d748f0a52fe2a778d4bc27232f;p=spider.git diff --git a/perl/console.pl b/perl/console.pl index 720d2575..66361808 100755 --- a/perl/console.pl +++ b/perl/console.pl @@ -27,11 +27,16 @@ BEGIN { $is_win = ($^O =~ /^MS/ || $^O =~ /^OS-2/) ? 1 : 0; # is it Windows? } +$clusteraddr = '127.0.0.1'; +$clusterport = 27754; + use Mojo::IOLoop; +use DXVars; +use SysVar; + use Msg; use IntMsg; -use DXVars; use DXDebug; use DXUtil; use DXDebug;