projects
/
spider.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
| inline |
side by side
loads of changes and added things
[spider.git]
/
cmd
/
show
/
prefix.pl
diff --git
a/cmd/show/prefix.pl
b/cmd/show/prefix.pl
index 9273243504e0a7b6c73b782f68addfae4546c004..310ee6b858650972a2a2841c32fe52ab033d6232 100644
(file)
--- a/
cmd/show/prefix.pl
+++ b/
cmd/show/prefix.pl
@@
-10,10
+10,10
@@
my @list = split /\s+/, $line; # generate a list of callsigns
my $l;
my @out;
-print "line: $line\n";
+
#
print "line: $line\n";
foreach $l (@list) {
my @ans = Prefix::extract($l);
- print "ans:", @ans, "\n";
+
#
print "ans:", @ans, "\n";
next if !@ans;
my $pre = shift @ans;
my $a;