projects
/
spider.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(from parent 1:
7533410
)
fix rbn.pl
author
Dirk Koopman
<djk@tobit.co.uk>
Mon, 27 Mar 2017 11:37:02 +0000
(12:37 +0100)
committer
Dirk Koopman
<djk@tobit.co.uk>
Mon, 27 Mar 2017 11:37:02 +0000
(12:37 +0100)
perl/rbn.pl
patch
|
blob
|
history
diff --git
a/perl/rbn.pl
b/perl/rbn.pl
index 8438b8e6549b3f3087756df762b28c03cc614542..773564c2946c5d2d58212ed725293db093f43326 100755
(executable)
--- 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;