• Publicidad

Envío de Correo - Primeros Pasos

¿Ya sabes lo que es una referencia? Has progresado, el nível básico es cosa del pasado y ahora estás listo para el siguiente nivel.

Envío de Correo - Primeros Pasos

Notapor dolisguilarte » 2012-03-22 14:22 @640

Hola... Necesito enviar un correo. Anexo código de ejemplo que estoy utilizando
este ejemplo sencillito de prueba:

#!c:/Perl/bin/perl.exe
use strict;
use Mail::Sendmail;

# Creamos el hash con nuestro mensajes
my %mail = (
To => '[email protected]',
From => '[email protected]',
Subject => 'Asunto del mensaje',
Message => 'Mi mensajes',
Smtp => ''
);

# Enviar el mensaje
unless (sendmail(%mail)) {
# Error!
print "ERRORn";
exit(1);
}

# Envío correcto.
print "OKn";
exit(1);


Pero el resultado arrojado es ERRORn

Mi pregunta es, ¿qué tengo que hacer adicionalmente para saber por qué no está haciendo el envío, utilizo Windows y servidor IIS 7.
dolisguilarte
Perlero nuevo
Perlero nuevo
 
Mensajes: 21
Registrado: 2012-03-07 16:33 @731

Publicidad

Re: Envío de Correo - Primeros Pasos

Notapor explorer » 2012-03-22 14:36 @650

Ya lo pone en la documentación del módulo... O modificas Sendmail.pm para indicar tu servidor de correo, o lo indicas dentro del hash con el atributo smtp, que tu ahora tienes vacío.

Atención, que el manual también dice que no soporta autenticación, así que no podrás enviar correo usando servidores de correo que necesiten autenticación.

Por estos foros ya hemos hablado más de una vez del tema del envío de correo. Usa el sistema de correo.

Si quieres saber por qué ha fallado, debes poner el atributo debug, a un valor entre 1 y 6.
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


Volver a Intermedio

¿Quién está conectado?

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