Antes que nada los felicito por este sitio muy útil para los que no tenemos tanta experiencia con Perl
![Smile :)](http://perlenespanol.com/foro/images/smilies/icon_smile.gif)
Les explico mi problema: estoy intentando hacer un formulario de contacto; el servidor es Windows; no hay sendmail pero vi que está instalado el módulo Net::SMTP; hasta el día de hoy no he podido hacer funcionar el script. El código es el siguiente:
Using perl Syntax Highlighting
#!C:\perl\bin\perl.exe
print "Content-type:text/html\n\n";
use Net::SMTP;
$ServerName="smtp.dominio1.com";
$from="cuenta\@dominio1.com";
$to="cuenta\@dominio2.com";
$subject="Prueba";
$smtp = Net::SMTP->new($ServerName) || die "No se puede conectar al servidor";
$smtp->mail( $from );
$smtp->to( $to );
$smtp->data();
$smtp->datasend("To: $to\r\n");
$smtp->datasend("From: $from\r\n");
$smtp->datasend("Subject: $subject\r\n");
$smtp->datasend("\n");
$smtp->datasend("Prueba de correo\n");
$smtp->datasend("\n");
$smtp->dataend();
$smtp->quit; #
print "Mensaje enviado";
print "Content-type:text/html\n\n";
use Net::SMTP;
$ServerName="smtp.dominio1.com";
$from="cuenta\@dominio1.com";
$to="cuenta\@dominio2.com";
$subject="Prueba";
$smtp = Net::SMTP->new($ServerName) || die "No se puede conectar al servidor";
$smtp->mail( $from );
$smtp->to( $to );
$smtp->data();
$smtp->datasend("To: $to\r\n");
$smtp->datasend("From: $from\r\n");
$smtp->datasend("Subject: $subject\r\n");
$smtp->datasend("\n");
$smtp->datasend("Prueba de correo\n");
$smtp->datasend("\n");
$smtp->dataend();
$smtp->quit; #
print "Mensaje enviado";
Coloreado en 0.003 segundos, usando GeSHi 1.0.8.4
He cambiado "smtp.dominio1.com" por "mail.dominio1.com" pero no llega el correo. Lo interesante es que tampoco me marca error
![Confused :?](http://perlenespanol.com/foro/images/smilies/icon_confused.gif)
¿Estoy haciendo algo mal?, ¿será algo del módulo?
He visto otros posts en donde se mencionan otros módulos como Mail::Sender o MIME::Lite pero desafortunadamente no están en el servidor y no hay mucho soporte por parte del hosting para ese asunto.
¡¡ Gracias de antemano por su respuesta !!
¡¡ Saludos !!