Eu indico fortemente o smtp-cli do Michal Ludvig disponível em 
<a href="http://www.logix.cz/michal/devel/smtp-cli/index.xp?show_selected=1&msgid=31">http://www.logix.cz/michal/devel/smtp-cli/index.xp?show_selected=1&msgid=31</a> <div><br></div><div>É válido para qualquer servidor SMTP c/ SSL, TLS, não-criptado...</div>

<div><br></div><div><div><span style="font-family:Arial;font-size:12px"><br></span></div><div><span style="font-family:Arial;font-size:12px"><br></span></div><div><span style="font-family:Arial;font-size:12px">----<br>
João Gabriel C. Laass<br><table border="0"><tbody><tr><td style="font-size:12px;font-family:Arial">
<img src="cid:ii_13120dd24669a901" alt="email3_16x16.png" title="email3_16x16.png"></td>
<td style="font-size:12px;font-family:Arial"> <a href="mailto:gabriel@joaogabriel.org" style="text-decoration:none" target="_blank">gabriel@joaogabriel.org</a></td></tr><tr><td style="font-size:12px;font-family:Arial">
<br></td><td style="font-size:12px;font-family:Arial"><br></td></tr></tbody></table><br></span></div>
<br>
<br><br><div class="gmail_quote">2011/9/21 Márcio Ferreira Ribeiro <span dir="ltr"><<a href="mailto:mmmferreira@gmail.com" target="_blank">mmmferreira@gmail.com</a>></span><br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">Muito Obrigado Junior.<br><br>Funcionou de primeira. Agora vou fazer os ajustes dentro do sistema e colocar para funcionar o mais rápido possível.<br>


<br>Atenciosamente,<br>Márcio Ferreira<div><div><br><br><div class="gmail_quote">2011/9/21 Junior Moraes <span dir="ltr"><<a href="mailto:juniiior182@gmail.com" target="_blank">juniiior182@gmail.com</a>></span><br>



<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">Hi.<br>

<br>

Não testei os módulos que você exemplificou, mas consigo enviar emails 
normalmente com o GMail através do módulo  Net::SMTP::TLS.<br><br>Se ajudar em algo...<br><a href="https://gist.github.com/f7cecd4edc80e165b09b" target="_blank">https://gist.github.com/f7cecd4edc80e165b09b</a><br><br>[]'s<br>



<br><br>

<div class="gmail_quote"><div><div></div><div>2011/9/21 Márcio Ferreira Ribeiro <span dir="ltr"><<a href="mailto:mmmferreira@gmail.com" target="_blank">mmmferreira@gmail.com</a>></span><br></div></div><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">



<div><div></div><div>


Olá Pessoal,<br><br>como vão?<br>Eu sei que é uma coisa simples, mas não consigo fazer funcionar. Eu sempre enviei emails usando o sendmail local dos servidores onde trabalhei, e nesse projeto não estava diferente, até que decidiram em mudar o provedor de emails para o Google, usando o Gmail.<br>










E há uma exigência para que o envio de emails (boletins de forma geral), seja feito através dos servidores do Google.<br>Então fui procurar sobre isso na internet e encontrei algumas coisas bem praticas mas nada funcionou<br>









<br>Receita de bolo 1 (Não retorna erros, alertas, nem nada):<br>use warnings;    <br>use Mail::Webmail::Gmail;<br>    my $gmail = Mail::Webmail::Gmail->new( <br>                username => '<a href="mailto:mmmferreira@gmail.com" target="_blank">mmmferreira@gmail.com</a>', password => 'XXXXXX',<br>









            );<br>    <br>    $gmail->send_message( to => '<a href="mailto:mmmferreira@gmail.com" target="_blank">mmmferreira@gmail.com</a>', subject => 'Test Gmail', msgbody => 'This is a test 1.' );<br>









<br><br>Receita de bolo 2 (Não retorna erros, alertas, nem nada): <br>  use strict;<br>  use warnings;<br>  use Email::Send;<br>  use Email::Send::Gmail;<br>  use Email::Simple::Creator;<br><br>  my $email1 = Email::Simple->create(<br>







      header => [<br>

          From    => '<a href="mailto:mmmferreira@gmail.com" target="_blank">mmmferreira@gmail.com</a>',<br>          To      => '<a href="mailto:mmmferreira@gmail.com" target="_blank">mmmferreira@gmail.com</a>',<br>








          Subject => 'Test Gmail',<br>
      ],<br>      body => 'Test test',<br>  );<br>  <br>  my $sender = Email::Send->new(<br>      {   mailer      => 'SMTP::TLS',<br>          mailer_args => [<br>              Host => '<a href="http://smtp.gmail.com" target="_blank">smtp.gmail.com</a>',<br>









           Port => 587,<br>        username => '<a href="mailto:mmmferreira@gmail.com" target="_blank">mmmferreira@gmail.com</a>',<br>              password => 'XXXXXX',<br>          ]<br>      }<br>








  );<br><br>  eval { $sender->send($email1) };<br>
  die "Error sending email Gmail: $@" if $@;<br><br><br>Receita de bolo 3 (retorna esse erro: "Could not connect to SMTP server", mas mesmo alterando SMTP para algumas sugestões que encontrei na internet, tb não funcionou):<br>








   use warnings;<br>   use Email::Send::SMTP::Gmail;<br><br>   my $mail=Email::Send::SMTP::Gmail->new( -smtp=>'<a href="http://gmail.com" target="_blank">gmail.com</a>',<br>
                                           -login=>'<a href="mailto:mmmferreira@gmail.com" target="_blank">mmmferreira@gmail.com</a>',<br>                                           -pass=>'XXXXXX');<br>








<br>   $mail->send(-to=><a href="mailto:mmmferreira@gmail.com" target="_blank">mmmferreira@gmail.com</a>',<br>
               -subject=>'Hello!',<br>               -verbose=>'1',<br>               -body=>'Just testing it'<br>        #,-attachments=>'full_path_to_file'<br>    );<br><br>   $mail->bye;<br>









<br><br><br>Já verifiquei se há algum bloqueio de portas nas duas máquinas que estou testando e não encontrei nada. O POP3 e o IMAP estão habilitados na minha conta pessoal que estou usando para testar.<br>Só me restou recorrer a vocês.<br>









<br>Agradeço por qq ajuda, dica ou direção q me derem.<br><br>Márcio Ferreira<br><font color="#888888"><br>-- <br><a href="http://empregar.com%20" target="_blank">Empregar.com </a>- Uma forma simples de encontrar seu próximo emprego na Internet.<br>









<br>
</font><br></div></div>_______________________________________________<br>
Cascavel-pm mailing list<br>
<a href="mailto:Cascavel-pm@pm.org" target="_blank">Cascavel-pm@pm.org</a><br>
<a href="http://mail.pm.org/mailman/listinfo/cascavel-pm" target="_blank">http://mail.pm.org/mailman/listinfo/cascavel-pm</a><br></blockquote></div><br>
<br>_______________________________________________<br>
Cascavel-pm mailing list<br>
<a href="mailto:Cascavel-pm@pm.org" target="_blank">Cascavel-pm@pm.org</a><br>
<a href="http://mail.pm.org/mailman/listinfo/cascavel-pm" target="_blank">http://mail.pm.org/mailman/listinfo/cascavel-pm</a><br></blockquote></div><br><br clear="all"><br>-- <br><a href="http://empregar.com%20" target="_blank">Empregar.com </a>- Uma forma simples de encontrar seu próximo emprego na Internet.<br>



<br>
</div></div><br>_______________________________________________<br>
Cascavel-pm mailing list<br>
<a href="mailto:Cascavel-pm@pm.org" target="_blank">Cascavel-pm@pm.org</a><br>
<a href="http://mail.pm.org/mailman/listinfo/cascavel-pm" target="_blank">http://mail.pm.org/mailman/listinfo/cascavel-pm</a><br></blockquote></div><br>
</div>