Select Code to Download

    my $mime = MIME::Lite->new(
        From    => 'admin@server',
...
    $mime->attach( Data => $invoice_as_pdf, Type => 'AUTO', Dispositio
+n => 'attachment', Filename => 'invoice.pdf' );
    
    $mime->send( 'sendmail', FromSender => 'admin@server' );

MIME-Version: 1.0
Content-Transfer-Encoding: binary
...

--_----------=_1365192382184080--