Cómo enviar correo desde un Perl / CGI?

En los sistemas Unix y Linux se puede utilizar el software de sendmail para enviar mensajes de correo electrónico. A continuación, puede enriquecer nuestra aplicación Perl / CGI con la capacidad de enviar correo electrónico con un simple listado en el código:

 # Código ...

 





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

 





 print MAIL "A: $ destinatario \ n";

 





 print MAIL "From: $ remitente \ n";

 





 print MAIL "Subject: $ asunto \ n";

 





 print MAIL "Cuerpo del mensaje .... \ n";

 





 print MAIL "Mensaje ... \ n";

 





 cierre (MAIL);

 





 # Código ...