É sério q sobrou pra mim pagar cerveja também?!?!<br><br>aff.. rs...<br><br>ae Esdras... daqui a pouco o Henry te responde... num voltou do almoço ainda...<br><br>Tony<br>-------------------------<br><br><div><span class="gmail_quote">
On 8/15/06, <b class="gmail_sendername">Esdras Neto</b> <<a href="mailto:esdras@gmail.com">esdras@gmail.com</a>> wrote:</span><blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">
<div><br><br>
<span class="gmail_quote"></span><div>Consegui resolver o problema da autenticação<br>
Tive de compilar mais dois modulos do Perl <br>
Authen-SASL<br>
e<br>
Net-SMTP_auth<br>
<br>
Segue o script que fiz<br>
<br>
<font size="3"> #!/usr/bin/perl -w<br><br>use strict;<br>use Net::SMTP_auth;<br><br>my $smtp = Net::SMTP_auth->new('<a href="http://smtp.dominio.com.br" target="_blank" onclick="return top.js.OpenExtLink(window,event,this)">
smtp.dominio.com.br</a>',<br> Debug => 1,<br> Timeout => 60
<br> );<br>$smtp->auth('CRAM-MD5','<a href="mailto:user@dominio.com.br" target="_blank" onclick="return top.js.OpenExtLink(window,event,this)">user@dominio.com.br</a>','senha');<br>$smtp->mail('<a href="mailto:user@dominio.com.br" target="_blank" onclick="return top.js.OpenExtLink(window,event,this)">
user@dominio.com.br</a>');<br>$smtp->to('<a href="mailto:user@dominio.com.br" target="_blank" onclick="return top.js.OpenExtLink(window,event,this)">
user@dominio.com.br</a>');<br>$smtp->to('<a href="mailto:user2@dominio.com.br" target="_blank" onclick="return top.js.OpenExtLink(window,event,this)">user2@dominio.com.br</a>');<br>$smtp->data();<br>$smtp->datasend("Subject: teste \n\n");
<br>$smtp->datasend("Isso eh um teste \n");
<br>$smtp->dataend();<br>$smtp->quit();<br>print "Email enviado!\n\n";<br>exit;</font><br>
<br>
<br>
Obrigado por todos que ajudaram!<br></div><div><span>
<br>
Esdras</span></div><div><span><br>
<br>
<br><br><div><span class="gmail_quote">On 8/15/06, <b class="gmail_sendername">Marco A P D´Andrade</b> <<a href="mailto:mda@embratel.net.br" target="_blank" onclick="return top.js.OpenExtLink(window,event,this)">mda@embratel.net.br
</a>> wrote:</span><blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">
<div><div>
A autenticacao tem de ser feita antes de qualquer outro comando ...<br>
<br>
<br>
E para tirar outras duvidas ...<br>
não acrescente escape em aspas simles ... to('user\@' ...<br>
nao utilize quebras de linhas nos enderecos de email<br>
acrescente os parametros Debug=>1 ao criar o objeto $smtp ...<br>
<br>
Sds,<br>
Marco Antonio</div><div><span></span></div><div><span class="q"><br>
<br>
<br>
Esdras Neto wrote:<br>
<br>
> Pessoal,<br>
><br>
> Tenho um script para enviar email, mas ele não funciona.<br>
><br>
> Alguem já fez algo do tipo e sabe fazer funcionar ?<br>
><br>
><br>
><br></span></div><div><span class="q">
> #!/usr/bin/perl<br>
><br>
> use Net::SMTP;<br></span></div><div><span class="q">
> $smtp = Net::SMTP->new('<a href="http://smtp.dominio.com.br" target="_blank" onclick="return top.js.OpenExtLink(window,event,this)">smtp.dominio.com.br</a>');<br>
> $smtp->mail("user");<br>
> $smtp->auth("user","pass");<br>
> $smtp->to('user\@dominio.com.br\n');<br>
> $smtp->data();<br>
> $smtp->datasend("To: user\@dominio.com.br\n\n");<br>
> $smtp->datasend("From: user\@dominio.com.br\n\n");<br>
> $smtp->datasend("email enviado!");<br></span></div><div><span class="q">
> $smtp->quit;<br>
> print "Content-type: text/html\n\n";<br>
> print "email enviado\n\n";<br>
> exit;<br>
><br>
><br>
><br>
><br></span></div><div>
> Esdras</div><div><span class="q"><br>
><br>
> -- <br>
> "Conquistemos a terra em nome do Senhor"<br>
> <br>
<br>
<br>
<br></span></div><div></div><div>
-- <br>
Marco Antonio P D'Andrade<br>
Gerencia Servicos Redes Clientes - (Servidores Internet)<br>
Embratel - Rio de Janeiro - RIT 521-4898 <br>
<br>
<br>
<span width="1" style="color: white;">__._,_.___</span>
<img height="1" width="1"> <br>
<br>
<table border="0" cellpadding="2" cellspacing="0">
<tbody><tr bgcolor="#ffffcc">
<td align="center"><font color="#003399" size="-1"><b>Yahoo! Grupos, um serviço oferecido por:</b></font></td>
</tr>
<tr bgcolor="#ffffff">
<td align="center" width="470"><table border="0" cellpadding="0" cellspacing="0"><tbody><tr><td align="center">
<font face="arial" size="-2">PUBLICIDADE</font><br>
<a href="http://br.ard.yahoo.com/SIG=12fca49f4/M=396563.7943091.9891114.2369893/D=brclubs/S=2137114674:HM/Y=BR/EXP=1155667435/A=3909188/R=0/id=noscript/SIG=15kgg4brd/*http://lt.dell.com/lt/lt.aspx?CID=15059&LID=369490&DGC=BA&DGSeg=DHS&DURL=http://www1.la.dell.com/content/products/features.aspx/advertised_latitude_D520?c%3dbr%26l%3dpt%26s%3ddhs" target="_blank" onclick="return top.js.OpenExtLink(window,event,this)">
<img border="0" height="250" width="300">
</a>
</td></tr></tbody></table></td>
</tr>
</tbody></table>
<br>
<hr width="500">
<b>Links do Yahoo! Grupos</b><br>
<ul>
<li>Para visitar o site do seu grupo na web, acesse:<br><a href="http://br.groups.yahoo.com/group/perlbr/" target="_blank" onclick="return top.js.OpenExtLink(window,event,this)">http://br.groups.yahoo.com/group/perlbr/</a>
<br>
</li><li>Para sair deste grupo, envie um e-mail para:<br><a href="mailto:perlbr-unsubscribe@yahoogrupos.com.br?subject=Unsubscribe" target="_blank" onclick="return top.js.OpenExtLink(window,event,this)">perlbr-unsubscribe@yahoogrupos.com.br
</a><br>
</li><li>O uso que você faz do Yahoo! Grupos está sujeito aos <a href="http://br.yahoo.com/info/utos.html" target="_blank" onclick="return top.js.OpenExtLink(window,event,this)">Termos do Serviço do Yahoo!</a>.
</li></ul>
<br>
<span style="color: white;">__,_._,___</span>
</div>
</div></blockquote></div></span></div><div><span class="q"><br><br clear="all"><br>-- <br>"Conquistemos a terra em nome do Senhor"
</span></div><div></div></div><div><span class="e" id="q_10d12d412541fcd6_10"><br clear="all"><br>-- <br>"Conquistemos a terra em nome do Senhor"
</span></div><br>_______________________________________________<br>SaoPaulo-pm mailing list<br><a onclick="return top.js.OpenExtLink(window,event,this)" href="mailto:SaoPaulo-pm@pm.org">SaoPaulo-pm@pm.org</a><br><a onclick="return top.js.OpenExtLink(window,event,this)" href="http://mail.pm.org/mailman/listinfo/saopaulo-pm" target="_blank">
http://mail.pm.org/mailman/listinfo/saopaulo-pm</a><br><br></blockquote></div><br><br>