indietro

Questa risposta proviene direttamente dalla documentazione di MIME::Lite. Create un messaggio multipart (vale a dire, un messaggio con degli allegati).

    use MIME::Lite;

    ### Crea un nuovo messaggio multipart:
    $msg = MIME::Lite->new(
              From    =>'me@ilmiohost.com',
              To      =>'te@iltuohost.com',
              Cc      =>'qualche@altrohost.com, ancora@uno.com',
              Subject =>'Un messaggio in due parti...',
              Type    =>'multipart/mixed'
    );

    ### Aggiunge una parte (ogni "attach" ha gli stessi argomenti di "new"):
    $msg->attach(Type     =>'TEXT',
                Data     =>"Ecco la GIF che volevi"
    );
    $msg->attach(Type     =>'image/gif',
                Path     =>'aaa000123.gif',
                Filename =>'logo.gif'
    );

    $text = $msg->as_string;

MIME::Lite include anche un metodo per inviare queste cose.

   $msg->send;

Con le impostazioni di default usa sendmail, ma può essere adattato per usare SMTP attraverso Net::SMTP.

vedi in inglese