From: Dirk Koopman Date: Mon, 27 Mar 2017 11:37:02 +0000 (+0100) Subject: fix rbn.pl X-Git-Url: http://www.dxcluster.org/gitweb/gitweb.cgi?a=commitdiff_plain;h=ee6feb1687745805069c8f539a9ddc9998022667;hp=753341096e3c03d0a6c07e816aff4f99b0af164f;p=spider.git fix rbn.pl --- diff --git a/perl/rbn.pl b/perl/rbn.pl index 8438b8e6..773564c2 100755 --- a/perl/rbn.pl +++ b/perl/rbn.pl @@ -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; -#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;