I've included a shorter snippet from production code below. You can combine the object instantiation & text part of the email in new(). The attach param is an array ref of attachments. In my case, I have the data in memory from a dynamically generated PDF, but I believe you can also give a path to a file as well.

One option to attach() is Filename, which I recommend you use to set a sane name for the attachment, ie. "Your_documents.pdf". You'll need some code to set $mime_type. My code only attaches PDF files, so I just hardcoded it. 

sub send_mime {
    my $class = shift;
    my %args = (from=>'',
        to=>'',
        subject=>'Default Subject',
        body=>'',
        attach=>[], # [{data=>\$content, name=>'foo'}]
        @_,
           );

    # 1. create main body of email
    my $body = $args{body};
    $body = ref($body) ? $$body : $body;
    my $msg = MIME::Lite->new(From=>$args{from},
                  To=>$args{to},
                  Subject=>$args{subject},
                  Type=>'TEXT',
                  Data=>$body,
                 );

    # 2. attach file(s)
    foreach my $attach ( @{$args{attach}} ) {
    my $data = $attach->{data};
    $msg->attach(Type=>$mime_type,
             Data=>$$data,
             Filename=>$attach->{name},
            );
    }

    # 3. deliver email
    $msg->send();
}

[download]

In reply to Re: Sending e-mail with attachments. by drewbie
in thread Sending e-mail with attachments. 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.