Package: libemail-mime-contenttype-perl
Version: 1.857-1

Parsing a Content-Type: less mail via Email::MIME causes
libemail-mime-contenttype-perl to throw an error (though not
fatal). Headers available on request.

        Use of uninitialized value in pattern match (m//) at 
/usr/share/perl5/Email/MIME/Content Type.pm line 24, <GEN0> line 190.

Here is the code:

 21 sub parse_content_type { # XXX This does not take note of RFC2822 comments
 22     my $ct = shift;
 23 
 24     $ct =~ m[ ^ ($discrete) / ($composite) \s* ($params)? $ ]x
 25         or return parse_content_type($ct_default);
 26         # It is also recommend (sic.) that this default be assumed when a
 27         # syntactically invalid Content-Type header field is encountered.
 28 
 29     return { discrete => lc $1, composite => lc $2,
 30              attributes => _parse_attributes($3) };
 31 }

Flo
-- 
Florian Lohoff                  [EMAIL PROTECTED]             +49-171-2280134
        Those who would give up a little freedom to get a little 
          security shall soon have neither - Benjamin Franklin

Attachment: signature.asc
Description: Digital signature

Reply via email to