Package: libmime-lite-perl
Version: 3.01-4
A diff from CPAN source to the installed debian package shows line 513 of the
debian package has:
return map { $_->address } Mail::Address->parse($_[0]);
instead of
return map { $_->format } Mail::Address->parse($_[0]);
which is in the CPAN sources. The following script runs against the CPAN-built
module, but errors out when run against the Debian module:
[EMAIL PROTECTED]:~$ more test
#!/usr/bin/perl -w
use MIME::Lite;
use strict;
my $name = "Shane Allen";
my $email = '[EMAIL PROTECTED]';
my $myname = "test tester";
my $myemail = '[EMAIL PROTECTED]';
my $mail = MIME::Lite->new(
To => "$name <$email>",
From => "$myname <$myemail>",
Subject => "Debian MIME::Lite test",
Type => 'text/html',
Data => "<html><body>Test test</body></html>"
);
$mail->send();
[EMAIL PROTECTED]:~$ perl test
can't extract address at < tester <[EMAIL PROTECTED]>> in <test tester <[EMAIL
PROTECTED]>>
--
To UNSUBSCRIBE, email to [EMAIL PROTECTED]
with a subject of "unsubscribe". Trouble? Contact [EMAIL PROTECTED]
