projects
/
spider.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
added some help text for the filtering
[spider.git]
/
cmd
/
show
/
call.pl
diff --git
a/cmd/show/call.pl
b/cmd/show/call.pl
index 92a99234c2819f227f5cfc4a7ad5ddd84fe3d9e6..4674b9180477c7c846d3be2e7405b6136ab8482c 100644
(file)
--- a/
cmd/show/call.pl
+++ b/
cmd/show/call.pl
@@
-10,6
+10,8
@@
my @list = split /\s+/, $line; # generate a list of callsigns
my $l;
my @out;
my $l;
my @out;
+return (1, "SHOW/CALL <callsign>, e.g. SH/CALL g1tlh") unless @list;
+
use Net::Telnet;
my $t = new Net::Telnet;
use Net::Telnet;
my $t = new Net::Telnet;
@@
-21,6
+23,7
@@
foreach $l (@list) {
Timeout => 5);
if ($t) {
$t->print(uc $l);
Timeout => 5);
if ($t) {
$t->print(uc $l);
+ Log('call', "show/call $l");
while (my $result = $t->getline) {
push @out,$result;
}
while (my $result = $t->getline) {
push @out,$result;
}