F�bio e a todos que queiram ajudar, estou querendo abusar um pouco mais da paci�ncia de vcs......=) � que gostaria de fazer o seguinte nesse script abaixo gostaria tb de em vez de eu digitar o corpo em html ele pegasse isso de um arquivo ex: arquivo.htm, e no "To" ele passaria para uma lista de e-mails que possuo. OBS: mas teria que ser 1 a 1. Ex: ele passaria o conteudo do arquivo.html para o primeiro da lista, depois para o segundo e assim por diante.
OBS: ISSO N�O � PARA SPAN E SIM PARA EU ENVIAR UMA NEWSLETTER PARA AS PESSOAS QUE SE CADASTRARAM EM MEU SITE PARA RECEB0E-LAS. > --- inicio do arquivo enviar-email.pl > #!/usr/bin/perl > > use MIME::Entity; > > my $corpo_html = <<FIM; > <html> > <body bgcolor="bla"> > Ol�, mundo !<br> > Este � um e-mail <b>HTML</b> ... > </body> > </html> > FIM > > my $top = build MIME::Entity > Type => 'text/html', > From => 'EMPRESA <[EMAIL PROTECTED]>', > To => '[EMAIL PROTECTED]', > Subject => 'email html', > Data => $corpo_html; > > open(MAIL,"| /usr/lib/sendmail -t"); > $top->print(\*MAIL); > close(MAIL); > -------------- fim do script Assinantes em 29/01/2002: 2228 Mensagens recebidas desde 07/01/1999: 152643 Historico e [des]cadastramento: http://linux-br.conectiva.com.br Assuntos administrativos e problemas com a lista: mailto:[EMAIL PROTECTED]
