| Subject: | message/digest MIME type not functional |
As reported in http://bugs.debian.org/cgi-bin/bugreport.cgi?bug=460396:
"This "TBD" item,
### TBD: this is not really right for message/digest:
if ( ( keys %{ $self->{Attrs}{'content-type'} } == 1 )
and ( $self->_safe_attr('content-type') eq 'text/plain' ) )
Caused me
Can't use string ("text/plain") as a HASH ref while "strict
refs" in use at /usr/share/perl5/MIME/Lite.pm line 1695.
When I added $part->scrub to
use MIME::Lite;
my $msg = MIME::Lite->new( Type => "multipart/digest", );
my $part = MIME::Lite->build(
Subject => "Hi there!",
Data => "wow",
);
$part->scrub;
$msg->attach($part);
$msg->print( \*STDOUT );
"