[SP-pm] MIME::Lite

[André Garcia Carneiro]

Tenho uma sugestão:

<code>
#! /usr/bin/perl -w
use strict;
use Mail::Sender;

my $mail = Mail::Sender->new();
eval{
   	$sender->MailMsg({
	   smtp 	=> 'meuservidor_smtp'
	   ,from 	=> 'from em algumdominio.com.br'
	   ,to 		=> 'to em algumdominio.com.br'
	   ,subject 	=> 'assunto'
	   ,msg 	=> 'O conteudo da mensagem(incluindo MIMEs aqui'
	   ,auth 	=> 'STRING do tipo de autenticação' #ex.: login
	   ,authid 	=> 'STRING do id do usuario do servidor smtp' #usuario de autenticacao do servidor(diferente do
usuario de e-mail, q fique claro!
	   ,authpwd 	=> 'senha_de_autenticacao'
	 };
};

if($Mail::Sender::Error){
    print "\nOoops! Problemas ao enviar e-mail: ".$Mail::Sender::Error; #$Mail = variável implícita do módulo.
}
else{
    print "\nE-mail enviado com sucesso!";
}
</code>

Tô com preguiça e sem tempo de fazer o 'attach'... RTFM no CPAN q tem exemplo lá(não leve a mal)...

Espero ter ajudado!

Cheers!

---------- Cabeçalho original -----------

De: saopaulo-pm-bounces+andre.garcia.carneir=terra.com.br em pm.org
Para: saopaulo-pm em mail.pm.org
Cópia: 
Data: Tue, 11 Nov 2008 11:08:01 -0200
Assunto: Re: [SP-pm] MIME::Lite

> É muito bom saber disso, mas eu não quero mandar mail em massa eu só quero
> aprender de forma simples a mandar mail com Perl.
> Eu estava lendo uma matéria do Nelson Ferreira no Perl.org.br sobre módulos
> recomendando do CPan, e encontrei o MIME:Lite para enviar mail, então
> resolvi aprender. :P
> 
> 2008/11/11 Luis Motta Campos <luismottacampos em yahoo.co.uk>
> 
> > Daniel de Oliveira Mantovani wrote:
> >
> >> Olha o que eu achei no meu S.O
> >>
> >> p
> >> libnet-smtp-server-perl
> >> - A native Perl SMTP Server implementation for
> >> Perl
> >>
> >> Isso será o suficiente ?
> >>
> >
> > Suficiente para o pessoal menos chegado em Spam (como eu) jogar tua
> > mensagem fora automaticamente.
> >
> > Um servidor de email precisa necessariamente constar no MX Record de pelo
> > menos um website para ser levado à sério.
> >
> > Se você começar a usar a tua conexão da Telefônica para enviar emails, eu
> > posso garantir que todo mundo que tem anti-spam vai filtrar as tuas
> > mensagens fácil, fácil.
> >
> > E não, não é o módulo que você deve usar para enviar emails.
> >
> > Putamplexos.
> > --
> > Luis Motta Campos is a software engineer,
> > Perl Programmer, foodie and photographer.
> >
> > _______________________________________________
> > SaoPaulo-pm mailing list
> > SaoPaulo-pm em pm.org
> > http://mail.pm.org/mailman/listinfo/saopaulo-pm
> >
> 
> 
> 
> -- 
> print
> "\x54\x68\x65\x20\x53\x69\x6c\x65\x6e\x74\x20\x47\x75\x61\x72\x64\x69\x61\x6e",$/
> 

--
André Garcia Carneiro
Developer(Perl/PHP)
Member of "São Paulo Perl Mongers" - http://sao-paulo.pm.org