Hey everyone, I am using Mime::Lite to send a bit of email. Sometimes it will be with an attachment and sometimes it will be without.
This is my code: ------------------------------------- if ($AttachFile) { $msg = MIME::Lite->new( To => $To, From => $From, Subject => $Subj, cc => $CC, Bcc => $BCC, 'X-MSMail-Priority' => $Priority, 'Importance' => $Priority, 'X-Mail-Sender' => 'My Sender', Type => 'multipart/mixed' ); $msg->attach( Type => 'text/html', Data => 'This is a test' ); $AttachType = 'base64' unless $AttachType; $msg->attach( Type => $AttachType, Path => $AttachFile, ); } else { $msg = MIME::Lite->new( To => $To, From => $From, Subject => $Subj, cc => $CC, Bcc => $BCC, 'X-MSMail-Priority' => $Priority, 'Importance' => $Priority, 'X-Mail-Sender' => 'My Sender', Type => 'text/html', Data => 'This is a test' ); } ------------------------------------ When I send mail with an attachment, the mail looks good in Outlook, Outlook Express, Netscape mail, but in Eudora it will look like: ---------------------- Subject: Test Content-Disposition: inline Content-Length: 1179 Content-Transfer-Encoding: binary Content-Type: text/html This is a test Content-Disposition: inline; filename="files.zip" Content-Type: base64; name="files.zip" ------------------------------------------------ It adds all the visible 'content-' stuff. Anyone know how I can convince Mime::Lite to get rid in Eudora? Thanks, Troy _______________________________________________ Perl-Unix-Users mailing list. To unsubscribe go to http://listserv.ActiveState.com/mailman/subscribe/perl-unix-users