You are viewing a plain text version of this content. The canonical link for it is here.
Posted to commits@spamassassin.apache.org by sp...@apache.org on 2022/02/13 08:30:58 UTC
svn commit: r1898029 - in /spamassassin/tags/sa-update_3.4.4_20220213083057: ./ masses/rule-qa/reports-from-logs
Author: spamassassin_role
Date: Sun Feb 13 08:30:58 2022
New Revision: 1898029
URL: http://svn.apache.org/viewvc?rev=1898029&view=rev
Log:
promotions validated
Added:
spamassassin/tags/sa-update_3.4.4_20220213083057/
- copied from r1898028, spamassassin/trunk/
Modified:
spamassassin/tags/sa-update_3.4.4_20220213083057/masses/rule-qa/reports-from-logs
Modified: spamassassin/tags/sa-update_3.4.4_20220213083057/masses/rule-qa/reports-from-logs
URL: http://svn.apache.org/viewvc/spamassassin/tags/sa-update_3.4.4_20220213083057/masses/rule-qa/reports-from-logs?rev=1898029&r1=1898028&r2=1898029&view=diff
==============================================================================
--- spamassassin/tags/sa-update_3.4.4_20220213083057/masses/rule-qa/reports-from-logs (original)
+++ spamassassin/tags/sa-update_3.4.4_20220213083057/masses/rule-qa/reports-from-logs Sun Feb 13 08:30:58 2022
@@ -111,14 +111,20 @@ sub locate_input {
my @files = sort readdir(CORPUS);
closedir(CORPUS);
+ warn "found ", $#files + 1, " files in $logsdir";
+
@files = grep {
/^(?:spam|ham)-(?:net-)?\S+\.log$/ && -f "$logsdir/$_" && -M _ < 10
} @files;
+ warn "kept ", $#files + 1, " files";
+
foreach my $file (@files) {
my $tag = 0;
my $headers = '';
+ warn "processing $logsdir/$file";
+
open(FILE, "$logsdir/$file") or warn "cannot read $logsdir/$file";
while (my $line = <FILE>) {
last if $line !~ /^#/;