http://bugzilla.spamassassin.org/show_bug.cgi?id=3670
Summary: 2.64: Error in PerMsgStatus.pm causes warnings
Product: Spamassassin
Version: 2.63
Platform: All
OS/Version: All
Status: NEW
Severity: normal
Priority: P5
Component: spamc/spamd
AssignedTo: [EMAIL PROTECTED]
ReportedBy: [EMAIL PROTECTED]
sub get() is changed in 2.64. I noticed messages like the following:
Use of uninitialized value in length at
/usr/local/perl-5.6.1/lib/site_perl/5.6.1/Mail/SpamAssassin/
PerMsgStatus.pm line 1339, <GEN133> line 49
The cause seems pretty obvious. This code is new:
foreach $hdr ($self->{msg}->get_all_headers()) {
last if ($length + length($hdr) > MAX_HEADER_LENGTH);
my($key, $value) = split(/:/, $hdr, 2);
# limit the length of the pairs we store
if (length($key) > MAX_HEADER_KEY_LENGTH) {
$key = substr($key, 0, MAX_HEADER_KEY_LENGTH);
}
if (length($value) > MAX_HEADER_VALUE_LENGTH) {
$value = substr($value, 0, MAX_HEADER_VALUE_LENGTH);
}
push(@hdrs, "$key:$value");
$length += length "$key:$value";
}
For headers without a right-hand part, $value is undefined ...
------- You are receiving this mail because: -------
You are the assignee for the bug, or are watching the assignee.
