Subject: | problem with latest Mail::Audit on FreeBSD 6.2 |
Date: | Thu, 4 Oct 2007 13:46:12 -0700 |
To: | bug-Mail-Audit [...] rt.cpan.org |
From: | Brian Dysart <bdysart [...] alink.net> |
I recently upgraded Mail::Audit to the latest version in the ports
collection for FreeBSD 6.2, 2.221. Since then, my incoming messages
have failed silently. I discovered the nature of the problem when I
sent a message to myself:
Show quoted text
----- The following addresses had permanent fatal errors -----
|~brian/Perl/filtermail
(reason: 255)
(expanded from: <brian@localhost>)
----- Transcript of session follows -----
Can't use string ("1") as an ARRAY ref while "strict refs" in use at /
usr/local/lib/perl5/site_perl/5.8.8/Mail/Audit.pm line 600.
554 5.3.0 unknown mailer error 255
"use strict;" is in Audit.pm itself. Line 600 is the second line of
code in the block below ("my $num_lines ..."), part of
_accept_to_maildir:
# since mutt won't add a lines tag to maildir messages, we'll add
it here
# XXX: Why the nuts is this here? This should be another method,
or a
# plugin! -- rjbs, 2006-05-30
unless (length $self->get("Lines")) {
my $num_lines = @{ $self->body };
$self->head->add("Lines", $num_lines);
$self->_log(4, "Adding Lines: $num_lines header");
}
The message in question had a one-line body, so this looks to be a
problem with array dereferencing or something like that.