X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FPrefix.pm;h=83b0ac40c9b870650db4a436fc5db4264658a1fc;hb=6e3c63cde45923c99f21b312a440e373bc23e679;hp=659178fbbd09c5b86d3bcd7cc92d370cc9c973f3;hpb=86d0e8cc034db0b0d23afc09b6f596c38a57885d;p=spider.git

diff --git a/perl/Prefix.pm b/perl/Prefix.pm
index 659178fb..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 = 10000;				# 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