projects
/
spider.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
| inline |
side by side
added cty-1603 and changes to wpxloc.raw from AD1C and WB8ZRL.
[spider.git]
/
perl
/
dbtest.pl
diff --git
a/perl/dbtest.pl
b/perl/dbtest.pl
index c4f5ca8e9d259a08cd016ce1530dc3b246654306..6951c76dbf041276d93227e3d8b54c390e6bf302 100755
(executable)
--- a/
perl/dbtest.pl
+++ b/
perl/dbtest.pl
@@
-20,6
+20,10
@@
use ARRL::DX;
while (@ARGV) {
my $fn = shift;
+ if ($fn eq '-d') {
+ ARRL::DX::drop();
+ next;
+ }
print "Processing $fn ";
my $dx = ARRL::DX->new(file=>$fn);
my $c = $dx->process;