From: minima Date: Sun, 29 Sep 2002 17:53:40 +0000 (+0000) Subject: increase LRU cache sizes X-Git-Tag: PRE-1-52~178 X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=commitdiff_plain;h=76b23ebfd5384033ecefd8bed4babfeb12d103e9;p=spider.git increase LRU cache sizes --- diff --git a/perl/DXUser.pm b/perl/DXUser.pm index 80a9b641..6b85afb3 100644 --- a/perl/DXUser.pm +++ b/perl/DXUser.pm @@ -32,7 +32,7 @@ $dbm = undef; $filename = undef; $lastoperinterval = 60*24*60*60; $lasttime = 0; -$lrusize = 500; +$lrusize = 2000; # hash of valid elements and a simple prompt %valid = ( diff --git a/perl/Prefix.pm b/perl/Prefix.pm index a07ebdbd..10559711 100644 --- a/perl/Prefix.pm +++ b/perl/Prefix.pm @@ -30,7 +30,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 = 2000; # size of prefix LRU cache $lru = LRU->newbase('Prefix', $lrusize);