[SP-pm] Email com autenticação
Alceu R. de Freitas Jr.
glasswalk3r em yahoo.com.br
Terça Agosto 15 08:37:57 PDT 2006
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/
Mais detalhes sobre a lista de discussão SaoPaulo-pm