X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FPrefix.pm;h=83b0ac40c9b870650db4a436fc5db4264658a1fc;hb=9301268297f3d6a9a043ab27cb3247a16c7397ae;hp=37afddf7c075e7d00efefb143e0585d4b58bdc2f;hpb=7d4b15681464d77945e7ea78ef60ed3305d57d95;p=spider.git diff --git a/perl/Prefix.pm b/perl/Prefix.pm index 37afddf7..83b0ac40 100644 --- a/perl/Prefix.pm +++ b/perl/Prefix.pm @@ -26,7 +26,7 @@ $db = undef; # the DB_File handle %prefix_loc = (); # the meat of the info %pre = (); # the prefix list $hits = $misses = $matchtotal = 1; # cache stats -$lrusize = 1000; # size of prefix LRU cache +$lrusize = 5000; # size of prefix LRU cache sub init { @@ -472,17 +472,17 @@ sub cty_data } my %valid = ( + city => '0,City', + cont => '0,Continent', + cq => '0,CQ', + dxcc => '0,DXCC', + itu => '0,ITU', lat => '0,Latitude,slat', long => '0,Longitude,slong', - dxcc => '0,DXCC', name => '0,Name', - itu => '0,ITU', - cq => '0,CQ', + qra => '0,Locator', state => '0,State', - city => '0,City', utcoff => '0,UTC offset', - cont => '0,Continent', - qra => '0,Locator', ); sub AUTOLOAD