| Subject: | Change Request To Allow Stationary Override |
Ive recently implemented the File::SortedSeek module for the purpose
of searching through a 4Gb MySQL query log.
However to get this to work I needed to make a change to your module
which I think might prove useful to include. Below is a patch to add
my changes:
--- SortedSeek.pm Fri Nov 16 09:28:24 2007
+++ SortedSeek.pm Fri Nov 16 09:37:11 2007
@@ -30,0 +31 @@
+my $MaxStationary = 5;
@@ -44,0 +46,2 @@
+sub getMaxStationary{ return $MaxStationary; }
+sub setMaxStationary{ $MaxStationary = shift || 5; }
@@ -248 +251 @@
- if ($stationary > 2) {
+ if ($stationary > $MaxStationary) {
@@ -277 +280 @@
- if ($stationary > 2) {
+ if ($stationary > $MaxStationary) {
Essentially I discovered that it needed a $stationary allowance of up
to 3 / 4 – when set to 2 it would find the correct lines until the
query log reached about 3000 rows.