You are viewing a plain text version of this content. The canonical link for it is here.
Posted to commits@spamassassin.apache.org by qu...@apache.org on 2004/05/01 09:25:01 UTC
svn commit: rev 10478 - incubator/spamassassin/trunk/masses
Author: quinlan
Date: Sat May 1 00:25:01 2004
New Revision: 10478
Modified:
incubator/spamassassin/trunk/masses/mass-check
Log:
add perl version and archname
Modified: incubator/spamassassin/trunk/masses/mass-check
==============================================================================
--- incubator/spamassassin/trunk/masses/mass-check (original)
+++ incubator/spamassassin/trunk/masses/mass-check Sat May 1 00:25:01 2004
@@ -85,6 +85,7 @@
use Getopt::Long;
use POSIX qw(strftime);
use constant HAS_TIME_PARSEDATE => eval { require Time::ParseDate; };
+use Config;
# default settings
$opt_c = "$FindBin::Bin/../rules";
@@ -148,7 +149,8 @@
}
my $log_header = "# mass-check results from $who\@$where, on $when\n" .
"# M:SA version ".$spamtest->Version()."\n" .
- "# SVN revision: $revision\n";
+ "# SVN revision: $revision\n" .
+ "# Perl version: $] on $Config{archname}\n";
my $host = $ENV{'HOSTNAME'} || $ENV{'HOST'} || `hostname` || 'localhost';
chomp $host;