[SP-pm] Email com autenticação

[Alceu R. de Freitas Jr.]

Henrique,

Você pode usar o Net::SMTP_auth
(http://search.cpan.org/author/APLEINER/Net-SMTP_auth-0.08/SMTP_auth.pm)
se precisar de autenticação no servidor. Eu já usei em
servidores diferentes, desde Exchange a servidores de
email gratuitos como Yahoo! e IG.

E não, não sou um spammer. :-D

[]'s
Alceu


--- Henrique <juhenrimas em yahoo.com.br> escreveu:

> Esdras, sinta-se a vontade para vir aqui no boteco
> da Estação Cultura em 
> Campinas e beber  o quanto você conseguir por nossa
> conta (minha e do 
> tony_ctc) . O seu script me resolveu um problemaço
> que você não tem idéia do 
> tamanho.
> Pelo que eu vi, só faltou o dataend(). A
> autenticação não deu para testar, 
> nosso smtp não usa, mas deve funcionar. Sem o
> dataend() não funcionou de 
> jeito algum. Gostei do script, realmente não
> conhecia o Net::SMTP. Muito bom 
> poder escolher o servidor de smtp a ser usado...
> 
> ficaria assim: 
> #!/usr/bin/perl
> 
> use Net::SMTP;
> $smtp = Net::SMTP->new('172.16.0.14',
> Timeout => 30,
> Debug=> 0,
> );
> 
> $smtp->mail('testando em campinas.sp.gov.br');
> $smtp->auth('usuario','senha');
> $smtp->to('bananaa em ig.com.br');
> $smtp->data();
> $smtp->datasend("\n");
> $smtp->datasend("Uma mensagem simples de teste\n");
> $smtp->dataend();
> $smtp->quit;
> print "Content-type: text/html\n\n";
> print "email enviado\n\n";
> exit;
> 
> (troque para Debug =>1 para ver o que acontece em
> tempo real.)
> 
> Obrigado, agradecimentos e divirta-se!!!
> 
> Henry



		
_______________________________________________________ 
Novidade no Yahoo! Mail: receba alertas de novas mensagens no seu celular. Registre seu aparelho agora! 
http://br.mobile.yahoo.com/mailalertas/