With the MIME::Tools package, I use MIME::Entity like the attached code. You should be using "multipart/mixed" unless you know why you aren't. You might want to add Disposition=>"attachment" to the HTML part and the gif parts. Some mailers will assume that the HTML is an alternative form of the text if you don't mark it as an attachment and other mailers will inline the gif at the end of your text if you don't mark it the same.

MIME::Lite is a sister product and supports the same tricks. Add the Disposition and see... 

# my $mailer = MIME::Entity->build( From=>'Automated Mailer <you@test.
+test>',
my $mailer = MIME::Lite->new( From=>'Automated Mailer <you@test.test>'
+,
        Subject=>"Report",
        To=>$email,
        Type=>"multipart/mixed",
        );
$mailer->attach(Type         =>'image/gif',
      Path         =>'/home/robert/newsroom.gif',
      Encoding     => "base64",
      Filename     =>'newsroom.gif',
      Disposition  =>'attachment'
  );

$mailer->attach(Type         =>'text/html',
      Path         =>'/home/robert/attachme.txt',
      Filename     =>'attachme.txt',
      Disposition  =>'attachment'
  );

$mailer->smtpsend(Host=>'smtp.test.test', To=>$email);

[download]

--
$you = new YOU;
honk() if $you->love(perl)

In reply to Re: How to separate attachments from the email body by extremely
in thread How to separate attachments from the email body by Anonymous Monk

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • 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:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.