bagder: curl-www/auto summarize.pl,1.66,1.67

Update of /cvsroot/curl/curl-www/auto
In directory giant.haxx.se:/var/tmp/cvs-serv6551

Modified Files:
	summarize.pl 
Log Message:
precaution to limit the parsing a bit. We need to redo this to instead
generate a HTML output file per specific date, as then we can limit the
parsing to only scan logs of today's date!


Index: summarize.pl
===================================================================
RCS file: /cvsroot/curl/curl-www/auto/summarize.pl,v
retrieving revision 1.66
retrieving revision 1.67
diff -u -d -r1.66 -r1.67
--- summarize.pl	10 Mar 2010 16:06:05 -0000	1.66
+++ summarize.pl	22 Mar 2010 13:42:40 -0000	1.67
@@ -24,7 +24,7 @@
 my $prevtable = -1;
 my $tablesperpage = 4;
 
-for ( 0 .. 3 ) {
+for ( 0 .. 5 ) {
     open(CLEAR, ">$prefix$_.t");
     
     my ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday) =
@@ -145,9 +145,13 @@
 }
 else {
     @data = "";
+    my $onlydo = 1000; # limit the amount of log parsings to this amount
     for(reverse sort @logs) {
         my $filename=$_;
         singlefile("inbox/$filename");
+        if(!$onlydo--) {
+            last;
+        }
     }
     summary();