-
- Publicidad
Envío de emails con Perl
43 mensajes
• Página 2 de 5 • 1, 2, 3, 4, 5
Publicidad
por explorer » 2008-01-04 19:53 @870
Using perl Syntax Highlighting
es para ejecutarlo en la línea de comandos, no como un CGI.
JF^D Perl programming & Raku programming. Grupo en Telegram: https://t.me/Perl_ES
-
explorer - Administrador
- Mensajes: 14480
- Registrado: 2005-07-24 18:12 @800
- Ubicación: Valladolid, España
por teamvipconnectz » 2008-01-05 16:47 @741
Estoy intentando con este script básico para enviar el email con el SMTP externo, pero sigo sin hacerlo funcionar, con sendmail si me funciona, pero para enviarlo con el SMTP remoto no. ¿Qué estaré haciendo mal?
Al correr el script no me marca algún error específico, solo esto:
No se me ocurre que más intentar para que funcione. AYUDA
Using perl Syntax Highlighting
#!/usr/bin/perl
use strict;
use MIME::Lite;
use MIME::Base64;
my($user)='[email protected]';
my($pass)='mipass';
my($host)='13861950.mail.dominio.com';
my $msg = MIME::Lite->new(
From =>'[email protected]',
To =>'[email protected]',
Subject =>'CGI email',
Data =>"FUNCIONA"
);
MIME::Lite->send('smtp', $host, AuthUser=>$user, AuthPass=>$pass);
$msg->send;
use strict;
use MIME::Lite;
use MIME::Base64;
my($user)='[email protected]';
my($pass)='mipass';
my($host)='13861950.mail.dominio.com';
my $msg = MIME::Lite->new(
From =>'[email protected]',
To =>'[email protected]',
Subject =>'CGI email',
Data =>"FUNCIONA"
);
MIME::Lite->send('smtp', $host, AuthUser=>$user, AuthPass=>$pass);
$msg->send;
Coloreado en 0.002 segundos, usando GeSHi 1.0.8.4
Al correr el script no me marca algún error específico, solo esto:
- Código: Seleccionar todo
500 Internal Server Error
The server encountered an internal error or misconfiguration and was unable to complete your request.
No se me ocurre que más intentar para que funcione. AYUDA
- teamvipconnectz
- Perlero nuevo
- Mensajes: 20
- Registrado: 2008-01-02 20:33 @898
por explorer » 2008-01-05 18:31 @813
El error estará seguramente en el registro de actividad (.log) Mira a ver qué es lo que dice.
Agrega
al principio del programa para que los errores te los muestre en el cliente web, ya que veo que lo ejecutas como un cgi.
Actualización: He probado tu programa y sí me funciona. Incluso me sobra el módulo MIME::Base64;
Agrega
Using perl Syntax Highlighting
al principio del programa para que los errores te los muestre en el cliente web, ya que veo que lo ejecutas como un cgi.
Actualización: He probado tu programa y sí me funciona. Incluso me sobra el módulo MIME::Base64;
JF^D Perl programming & Raku programming. Grupo en Telegram: https://t.me/Perl_ES
-
explorer - Administrador
- Mensajes: 14480
- Registrado: 2005-07-24 18:12 @800
- Ubicación: Valladolid, España
por teamvipconnectz » 2008-01-06 01:10 @090
explorer, descargué algunos módulos que no están instalados en mi hosting, para usarlos sin necesidad de tenerlos instalados. Me faltaba principalmente Authen::SASL pero ya he solucionado eso.
Estoy probando con este script:
Pero me está marcando ahora este error:
¿Sabes a qué se debe?
Estoy probando con este script:
Using perl Syntax Highlighting
#!/usr/bin/perl
use lib('lib');
use CGI::Carp qw(fatalsToBrowser);
use strict;
use MIME::Lite;
use Authen::SASL;
my($usuario)='[email protected]';
my($password)='mipass';
my($host)='00.00.00.000';
my $msg = MIME::Lite->new(
From =>'[email protected]',
To =>'[email protected]',
Subject =>'CGI email',
Data =>"FUNCIONA"
);
MIME::Lite->send('smtp', $host, AuthUser=>$usuario, AuthPass=>$password);
$msg->send;
use lib('lib');
use CGI::Carp qw(fatalsToBrowser);
use strict;
use MIME::Lite;
use Authen::SASL;
my($usuario)='[email protected]';
my($password)='mipass';
my($host)='00.00.00.000';
my $msg = MIME::Lite->new(
From =>'[email protected]',
To =>'[email protected]',
Subject =>'CGI email',
Data =>"FUNCIONA"
);
MIME::Lite->send('smtp', $host, AuthUser=>$usuario, AuthPass=>$password);
$msg->send;
Coloreado en 0.001 segundos, usando GeSHi 1.0.8.4
Pero me está marcando ahora este error:
- Código: Seleccionar todo
Cannot find a SASL Connection library at lib/Net/SMTP.pm line 143
¿Sabes a qué se debe?
- teamvipconnectz
- Perlero nuevo
- Mensajes: 20
- Registrado: 2008-01-02 20:33 @898
por explorer » 2008-01-06 07:08 @338
Según el código de mi módulo Authen::SASL (función client_new() llamada desde Net::SMTP), ese error sale porque no ha podido encontrar ni el módulo Authen::SASL::Cyrus ni el Authen::SASL::Perl.
JF^D Perl programming & Raku programming. Grupo en Telegram: https://t.me/Perl_ES
-
explorer - Administrador
- Mensajes: 14480
- Registrado: 2005-07-24 18:12 @800
- Ubicación: Valladolid, España
por teamvipconnectz » 2008-01-06 15:02 @668
explorer, agregué los módulos que me dijiste que faltaban y el script me funcionó perfecto, el problema ahora es que después de hacer como 3 envíos de email aparecieron los siguientes errores y ya no funcionó.
¿Tienes idea de qué se trata?
Muchas gracias por toda tu ayuda.
- Código: Seleccionar todo
Unknown callback: 'authname'. (user|auth|language|pass)
- Código: Seleccionar todo
SMTP RCPT command failed:
Este error es para esta linea:
$msg->send;
¿Tienes idea de qué se trata?
Muchas gracias por toda tu ayuda.
- teamvipconnectz
- Perlero nuevo
- Mensajes: 20
- Registrado: 2008-01-02 20:33 @898
por explorer » 2008-01-06 15:22 @682
SMTP RCPT indica un fallo en la indicación de los destinatarios. Podría ser que el servidor de correo tiene una limitación en el número de destinatarios. O que el destinatario está mal escrito...
JF^D Perl programming & Raku programming. Grupo en Telegram: https://t.me/Perl_ES
-
explorer - Administrador
- Mensajes: 14480
- Registrado: 2005-07-24 18:12 @800
- Ubicación: Valladolid, España
por teamvipconnectz » 2008-01-06 15:29 @687
¿Hay alguna manera de solucionar eso? Lo que se me hace raro es que haya enviado los primeros 3 mails correctamente y después al probar con EXACTAMENTE el mismo script marco esos errores.
¿Y este otro a qué se puede deber? ¿Alguna idea?
Se supone que mi servidor de email me da acceso al SMTP, POP3 & IMAP de manera ilimitada.
¿Y este otro a qué se puede deber? ¿Alguna idea?
- Código: Seleccionar todo
Unknown callback: 'authname'. (user|auth|language|pass)
Se supone que mi servidor de email me da acceso al SMTP, POP3 & IMAP de manera ilimitada.
- teamvipconnectz
- Perlero nuevo
- Mensajes: 20
- Registrado: 2008-01-02 20:33 @898
por teamvipconnectz » 2008-01-07 13:05 @587
Empiezo a pensar que el problema es por el email hosting que contraté, porque no encuentro nada de información acerca de este error:
contrate el plan A aquí: http://www.la.domains.coop/hosting.php?type=email&location=us&category=hosting
¿Ustedes creen que sea por eso? ¿Alguien me puede recomendar un servidor de email ilimitado?
Tengo un autoresponder con una lista de emails de mis clientes a los que les quiero mandar información constantemente, aproximadamente 5,000 es por eso que busco un servidor con esas características, ¿o hay alguna otra solución para hacer esto?
contrate el plan A aquí: http://www.la.domains.coop/hosting.php?type=email&location=us&category=hosting
¿Ustedes creen que sea por eso? ¿Alguien me puede recomendar un servidor de email ilimitado?
Tengo un autoresponder con una lista de emails de mis clientes a los que les quiero mandar información constantemente, aproximadamente 5,000 es por eso que busco un servidor con esas características, ¿o hay alguna otra solución para hacer esto?
- teamvipconnectz
- Perlero nuevo
- Mensajes: 20
- Registrado: 2008-01-02 20:33 @898
43 mensajes
• Página 2 de 5 • 1, 2, 3, 4, 5
¿Quién está conectado?
Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 13 invitados