[Rio-pm] envio de e-mail com LWP
Lucas Mateus
lucasmateus.oliveira em gmail.com
Terça Março 31 06:57:36 PDT 2009
Pode ser que o SMTP não esteja aceitando relay desse computador/servidor.
On Tue, 31 Mar 2009 10:34:52 -0300, Denilson Silva
<denilsongv2 em hotmail.com> wrote:
>
>
> Oi pessoal,
>
> Preciso criar um script perl para enviar e-mails , usando a LWP criei
> o script abaixo, quando executo,
> ele aparentemente roda normal e exibe a mensagem : " Message sent to
> <denilson.andrade em ufv.br>",
>
> porem nao recebo o email.
>
> Se alguem souber o que esta errado , ou souber de outro script pra envio
> de e-mails agradeco !
>
>
> #! /usr/bin/perl
> use warnings;
> use strict;
>
> use LWP::UserAgent;
> my $user = LWP::UserAgent->new;
>
> my $req = HTTP::Request->new( POST => 'mailto:denilson.andrade em ufv.br');
> $req->header(Subject => "Testando");
> $req->content(" Testando envio de email com lwp!\n");
>
>
> my $res = $user->request($req);
>
> if($res->is_success) {
> print $res->content, "\n";
> }
> else {
> print " Error: .$res->status_line";
> }
>
>
>
>
>
>
>
>
> Denilson S. de Andrade
> Graduando em Ciência da Computação
> UFV - Universidade Federal de Viçosa
>
> denilson.andrade em ufv.br
>
>
>
>
> _________________________________________________________________
> Confira vídeos com notícias do NY Times, gols direto do Lance,
> videocassetadas e muito mais no MSN Video!
> http://video.msn.com/?mkt=pt-br
--
Lucas Mateus
Núcleo de Páginas Rápidas e SEO
Fone: 55 11 3065-9978
MSN: lucasmateus_777 em hotmail.com
Mais detalhes sobre a lista de discussão Rio-pm