Hi perl monks,
I'm trying to write a program to handle sending email. I am using Mime::Lite. I am wanting to use embedded images in the HTML document. I can attach the files no problem, but can not display them in the body of the email. Heres the code.
$msg = MIME::Lite->new (
To =>'someone@somewhere.co.nz',
From => 'mail@someone.co.nz',
Subject =>'mailbird',
Type =>'multipart/mixed',
);
$msg->attach(Type => 'text/html',
Data => qq~
<html>
<body bgcolor="red">
<img src="http://www.google.co.nz/images/hp0.gif" alt="Google L
+OGO">
<p><font size=4>Taieri Print Ltd</font></p>
<img src="tplogo.jpg" alt="TP LOGO">
<p><font size=2 color="blue">Mailbird Newsletter</font></p>
</body>
</html>
~);
$msg->attach(Type =>'image/jpg',
Path =>'tplogo.jpg',
Filename =>'logo.jpg',
disposition=>'inline',
);
$msg->send('smtp', 'smtp.xtra.co.nz') or die 'Message not sent to $rec
+ipient';
When i reference a image located on a web server it works, but with later version of email clients such as Mozilla and Outlook, it requires the user to click on a button to display the image. This step is not wanted. Any ideas or guidance would be appreciated.
Thanks
Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
Read Where should I post X? if you're not absolutely sure you're posting in the right place.
Please read these before you post! —
Posts may use any of the Perl Monks Approved HTML tags:
- a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
| |
For: |
|
Use: |
| & | | & |
| < | | < |
| > | | > |
| [ | | [ |
| ] | | ] |
Link using PerlMonks shortcuts! What shortcuts can I use for linking?
See Writeup Formatting Tips and other pages linked from there for more info.