[SP-pm] Email com autenticação

Ivo Peixinho ivocarv em cais.rnp.br
Terça Agosto 15 06:54:34 PDT 2006


   Eu uso esta rotina e funciona:

use MIME::Lite;

$msg = MIME::Lite->new(
                  From    =>$from,
                  To      =>$to,
                  Cc      =>$cc,
                  Subject =>$subject,
                  Type    =>'text/html',
                  Data    =>"$data",
);


$msg->send;


On Tue, 15 Aug 2006, Esdras Neto wrote:

> Pessoal,
>
> Tenho um script para enviar email, mas ele não funciona.
>
> Alguem já fez algo do tipo e sabe fazer funcionar ?
>
>
>
> #!/usr/bin/perl
>
> use Net::SMTP;
> $smtp = Net::SMTP->new('smtp.dominio.com.br');
> $smtp->mail("user");
> $smtp->auth("user","pass");
> $smtp->to('user\@dominio.com.br\n');
> $smtp->data();
> $smtp->datasend("To: user\@dominio.com.br\n\n");
> $smtp->datasend("From: user\@dominio.com.br\n\n");
> $smtp->datasend("email enviado!");
> $smtp->quit;
> print "Content-type: text/html\n\n";
> print "email enviado\n\n";
> exit;
>
>
>
>
> Esdras
>
> -- 
> "Conquistemos a terra em nome do Senhor"
> _______________________________________________
> SaoPaulo-pm mailing list
> SaoPaulo-pm em pm.org
> http://mail.pm.org/mailman/listinfo/saopaulo-pm
>


Mais detalhes sobre a lista de discussão SaoPaulo-pm