Come inviare una mail da un programma Perl/CGI?
Nei sistemi Unix e Linux è possibile sfruttare il software sendmail per l'invio di messaggi di posta elettronica. Potremo quindi arricchire un nostro applicativo Perl/CGI con la possibilità di inviare mail inserendo un semplice listato nel codice:
# codice ... open(MAIL, "|/usr/lib/sendmail -t"); print MAIL "To: $destinatario\n"; print MAIL "From: $mittente\n"; print MAIL "Subject: $oggetto\n"; print MAIL "Corpo del messaggio... .\n"; print MAIL "Messaggio.. .\n"; close (MAIL); # codice ...
