> Amigos,
>
> Escrevi esta funcao para enviar um e-mail com PERL com o
> Blat em um sevidor NT, so que por algum motivo ele nao envia
> a mensagem. O Blat ja esta instalado corretamente, pois
> chamando o Blat no prompt eu consigo enviar, mas quando eu
> chamo ele pelo PERL ele simplesmente nao envia o E-mail.
>
> Alguem pode me dizer o que esta errado?!?
Tente fazer o seguinte: abra o blat, e depois mande o
arquivo temporario inteiramente para ele...
mais ou menos assim:
open(TEMP,"$arquivo_temporario");
@mensagem_a_ser_enviada = <TEMP>;
close(TEMP);
open(MAIL,"|$mailprog -t");
print MAIL "@mensagem_a_ser_enviada";
close(MAIL);
end
PAZ E BEM!
Daniel C. Junqueira
---------------------------
http://pagina.de/sfrancisco
http://pagina.de/danielcj
---------------------------
ICQ#: 22096783
http://www.mrweb.com.br/perl/
=======================================
>>No site da lista, voce tera tudo sobre PERL,
>>LINUX, PHP, ASP e informacoes, cadastramento
>>e descadastramento da Lista.
=======================================
