| Subject: | parts_multipart not able to parse discrete type 'message' |
Email::MIME 1.3
Perl 5.8.4
FreeBSD 4.10
This one I don't have a patch for; here is the error message:
Use of uninitialized value in quotemeta at
/usr/local/lib/perl5/vendor_perl/5.8.4/Email/MIME.pm line 66.
It appears that $boundary is not set here:
sub parts_multipart {
my $self = shift;
my $boundary = $self->{ct}->{attributes}->{boundary};
when trying to parse a bounce message of this type:
<message>
From MAILER-DAEMON Mon Jun 21 03:06:49 2004
From: Mail Delivery Subsystem <MAILER-DAEMON@tennis.motorcities.com>
To: <scott@perlcode.org>
Content-Type: multipart/report; report-type=delivery-status;
boundary="i5L93WVO001598.1087808631/tennis.motorcities.com"
Subject: Warning: could not send message for past 4 hours
This is a MIME-encapsulated message
--i5L93WVO001598.1087808631/tennis.motorcities.com
This part is ok
--i5L93WVO001598.1087808631/tennis.motorcities.com
Content-Type: message/delivery-status
This part causes problems
--i5L93WVO001598.1087808631/tennis.motorcities.com
Content-Type: message/rfc822
This part causes problems
--i5L93WVO001598.1087808631/tennis.motorcities.com--
</message>