Return-Path: Delivered-To: apmail-incubator-spamassassin-cvs-archive@www.apache.org Received: (qmail 87989 invoked from network); 1 May 2004 07:25:02 -0000 Received: from daedalus.apache.org (HELO mail.apache.org) (208.185.179.12) by minotaur-2.apache.org with SMTP; 1 May 2004 07:25:02 -0000 Received: (qmail 35658 invoked by uid 500); 1 May 2004 07:24:39 -0000 Delivered-To: apmail-incubator-spamassassin-cvs-archive@incubator.apache.org Received: (qmail 35637 invoked by uid 500); 1 May 2004 07:24:38 -0000 Mailing-List: contact spamassassin-cvs-help@incubator.apache.org; run by ezmlm Precedence: bulk list-help: list-unsubscribe: list-post: Reply-To: "Spam Assassin Dev" List-Id: "SpamAssassin Commits" Delivered-To: mailing list spamassassin-cvs@incubator.apache.org Received: (qmail 35624 invoked from network); 1 May 2004 07:24:38 -0000 Received: from unknown (HELO minotaur.apache.org) (209.237.227.194) by daedalus.apache.org with SMTP; 1 May 2004 07:24:38 -0000 Received: (qmail 87980 invoked by uid 65534); 1 May 2004 07:25:01 -0000 Date: 1 May 2004 07:25:01 -0000 Message-ID: <20040501072501.87978.qmail@minotaur.apache.org> From: quinlan@apache.org To: spamassassin-cvs@incubator.apache.org Subject: svn commit: rev 10478 - incubator/spamassassin/trunk/masses X-Spam-Rating: daedalus.apache.org 1.6.2 0/1000/N X-Spam-Rating: minotaur-2.apache.org 1.6.2 0/1000/N 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;