[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