]> gb7djk.dxcluster.net Git - spider.git/commitdiff
fix rbn.pl
authorDirk Koopman <djk@tobit.co.uk>
Mon, 27 Mar 2017 11:37:02 +0000 (12:37 +0100)
committerDirk Koopman <djk@tobit.co.uk>
Mon, 27 Mar 2017 11:37:02 +0000 (12:37 +0100)
perl/rbn.pl

index 8438b8e6549b3f3087756df762b28c03cc614542..773564c2946c5d2d58212ed725293db093f43326 100755 (executable)
@@ -74,8 +74,8 @@ for ($attempts = 1; $attempts <= 5; ++$attempts) {
 
 die "ADMIN,Cannot connect to $host:$port after 5 attempts $!" unless $sock;
 say "ADMIN,connected" if $dbg;
 
 die "ADMIN,Cannot connect to $host:$port after 5 attempts $!" unless $sock;
 say "ADMIN,connected" if $dbg;
-#print $sock "$mycall\r\n";
-#say "ADMIN,call $mycall sent" if $dbg;
+print $sock "$mycall\r\n";
+say "ADMIN,call $mycall sent" if $dbg;
 
 my %d;
 my %spot;
 
 my %d;
 my %spot;