• Publicidad

Envío de correos

¿Apenas comienzas con Perl? En este foro podrás encontrar y hacer preguntas básicas de Perl con respuestas aptas a tu nivel.

Envío de correos

Notapor BigBear » 2014-01-12 15:11 @674

Encontré este código en Internet y no funciona. Mi idea es usar algo así que no requiera instalar módulos externos, por eso me interesó el comando sendmail que trae Linux. El código es este:
Sintáxis: [ Descargar ] [ Ocultar ]
Using perl Syntax Highlighting
  1. sub send_email {
  2.     my ($remitente, $destinatario, $asunto, $mensaje) = @_;
  3.     open(MAIL, "|/usr/lib/sendmail -oi -t");
  4.     print MAIL "From: $remitente\n";
  5.     print MAIL "To: $destinatario\n";
  6.     print MAIL "Subject: $asunto\n\n";
  7.     print MAIL "$mensaje\n";
  8.     close(MAIL);
  9. }
  10.   send_email('[email protected]',
  11.              '[email protected]',
  12.              'Mensaje de prueba',
  13.              'Estimado usuario, este es un mensaje de prueba');
Coloreado en 0.004 segundos, usando GeSHi 1.0.8.4


¿ Alguien me puede ayudar ?
BigBear
Perlero frecuente
Perlero frecuente
 
Mensajes: 981
Registrado: 2009-03-01 18:39 @818

Publicidad

Re: Envío de correos

Notapor explorer » 2014-01-12 16:16 @719

El ejecutable sendmail no viene instalado en todos los Linux... Podría estar en su lugar el postfix, o el exim4 (aunque éstos también tienen su propio wrapper o alias llamado sendmail). Debes comprobar antes, desde la línea de comandos, que puedes usar ese sendmail.

Otro detalle importante es que tu proveedor de acceso a Internet no te permita enviar correo por ti mismo, y te obligue a usar su propio servidor de correo, por lo que, además, lo más seguro es que para usarlo tengas que autenticarte. Y el destinatario también puede imponer reglas muy duras en cuanto a qué correo admitir, y desechar, por ejemplo, a todo correo que llega de direcciones IP residenciales.

La casuística es muy amplia... y es independiente de que uses el comando sendmail o un módulo.

Actualmente, es bastante complicado enviar correos electrónicos... el spam ha tenido parte de culpa, claro.
JF^D Perl programming & Raku programming. Grupo en Telegram: https://t.me/Perl_ES
Avatar de Usuario
explorer
Administrador
Administrador
 
Mensajes: 14480
Registrado: 2005-07-24 18:12 @800
Ubicación: Valladolid, España

Re: Envío de correos

Notapor danimera » 2014-01-13 11:23 @516

Usa el Mite-Lite; estoy seguro que casi todos los servidores lo tienen ^^
100% Telch - Perl Web Programming
Cali PerlMongers: http://cali.pm.org
Avatar de Usuario
danimera
Perlero frecuente
Perlero frecuente
 
Mensajes: 871
Registrado: 2005-06-23 19:02 @834
Ubicación: Colombia


Volver a Básico

¿Quién está conectado?

Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 17 invitados