Kuinka lähettää postia Perl / CGI?

Vuonna Unix-ja Linux-järjestelmissä voit käyttää ohjelmistoa sendmail lähettää sähköposteja. Silloin me rikastuttavat sovellus Perl / CGI, joilla on kyky lähettää sähköpostia yksinkertainen listalle koodi:

 # Koodi ...

 





 open (MAIL, "| / usr / lib / sendmail-t");

 





 Tulosta Uutiskirje "Vastaanottaja: $ vastaanottaja \ n";

 





 Tulosta Uutiskirje "From: $ lähettäjän \ n";

 





 Tulosta Uutiskirje "Aihe: $ aihe \ n";

 





 Tulosta Uutiskirje "Viestin runkoa .... \ n";

 





 Tulosta Uutiskirje "Viesti ... \ n";

 





 Close (mail);

 





 # Koodi ...