Ci sono molti modi diversi per inviare e-mail , tuttavia, ci sono solo pochi modi "raccomandati" per scrivere codice efficiente . Una raccomandazione è di utilizzare Net :: SMTP per l'invio di messaggi di testo e utilizzando MIME :: Lite :: TT :: HTML per i messaggi HTML o per i messaggi con allegati . È possibile, tuttavia , utilizzare MIME :: Lite per creare il messaggio e hanno l'invio effettivo avviene con SMTP . Istruzioni
1

Creare un nuovo script in Perl , che è un file di testo salvato con estensione " . Pl " e creato in un editor di testo come Blocco note . Assicurati di includere un riferimento alla MIME :: Lite all'inizio dello script da parte di codifica " usa MIME :: Lite :: TT :: HTML ; ». Creare un'istanza dell'oggetto posta usando " MIME :: Lite :: TT :: HTML - > nuovo . " Assegnare un nome alla istanza di oggetto posta "$ myemailmsg ".
2

passare i parametri richiesti per il " $ myemailmsg " istanza di oggetto. I parametri includono il " di e-mail ", "dalla posta ", " oggetto " , "template " e " opzioni dei modelli . " Utilizzo di un modello rende il codice facilmente riutilizzabile
3

Utilizzare il modello per il vostro messaggio HTML da codice : .

Template = > {

myMsg = > ' mymsg.html.tt '

}

Il modello sarà costituito da una formattata correttamente documento HTML inizia con e termina con < /html > .

4

inviare il messaggio tramite SMTP passando il server SMTP e il tipo " smtp " per il metodo di invio. Codifica " $ myemailmsg - > send ( ' SMTP' , ' smtp.mywebsite.com ' , Timeout = > 60 )," invierà il messaggio utilizzando un server SMTP remoto , che si trova a " smtp.mywebsite.com " e timeout a 60 secondi . Se un semplice " $ myemailmsg - > send" è codificato , l'e-mail viene inviata utilizzando un'installazione sendmail locale
5

Aggiungi un allegato di codifica : .

$ Myemailmsg > allegare ( Type = > ' text /html ',

dati = > ddata {

Ciao

< /body> }

Installazione del codice HTML è un'altra opzione se non si desidera utilizzare un modello HTML .

• Come suddividere Oltre URL in Perl 
• Come inserire caratteri speciali in una variabile in Perl