Package: libmime-lite-perl Version: 3.020-2 Severity: normal
hy, seems that the /usr/share/perl5/MIME/Lite.pm has a bug around line 511: ... sub my_extract_full_addrs { my $str = shift; my @addrs; $str =~ s/\s/ /g; ### collapse whitespace ... If I send with this code a mail: .... $msg = MIME::Lite->new ( From => $from_address, To => $email, Subject => $subject, Type =>'multipart/mixed' ) or die "Error creating multipart container: $!\n"; $msg->attach ( Type => 'TEXT', Data => $message_body ) or die "Error adding the text message part: $!\n"; $msg->attach ( Type => 'application/zip', Path => $client_windows_src, Filename => $client_windows, Disposition => 'attachment' ) or die "Error adding $client_windows_src: $!\n"; $msg->attach ( Type => 'application/zip', Path => $client_unix_src, Filename => $client_unix, Disposition => 'attachment' ) or die "Error adding $client_windows_src: $!\n"; MIME::Lite->send('smtp', $mail_host, Timeout=>60); $msg->send; .... I got uninitialized errors on line 511 an so on. I have fix it with: .... sub my_extract_full_addrs { my $str = shift; my @addrs; if ($str eq "" ) { $str=" "; } $str =~ s/\s/ /g; ### collapse whitespace .... Ruben -- Ruben Puettmann [EMAIL PROTECTED] http://www.puettmann.net
signature.asc
Description: Digital signature