Re: [Sop.Tec.LinuxPPP] Como le hago para mandar un correo a futuro - send later

[Cristian Othon Martinez Vera <cfuga en itam mx>]

On Fri, 11 Aug 2000, jose antonio juarez paniagua wrote:

> El martes necesito que mi maquina envie un correo ( con archivos anexos
> - attachments ) en forma automatica, pero presimanete el dia martes yo
> no voy a estar en la oficina, como le hago para que lo envia por si solo
> en forma automatica.
> 
> OJO: Desde el servidor lo puedo hacer con el cron, pero lo NECESITO
> enviar desde una maquina cliente con linuxppp, ( de momento siempre
> envio los correos utilizando el Messenger de Netcape. ( mi sendmail, no
> lo tengo, aqui, esta del lado del server :(

 Lo puedes hacer con perl (vilmente copiado de la pagina de manual de
MIME::Tools):

#!/usr/bin/perl

use MIME::Entity;

$top = MIME::Entity->build(Type		=>"multipart/mixed",
			   From		=>"usuario\@dominio.com",
			   To		=>"otrousuario\@dominio.com",
			   Subject	=>"Hola!");

$top->attach(Path	=>"archivo.txt");
$top->attach(Path	=>"foto.jpg"),
	     Type	=>"image/jpg",
	     Encoding	=>"base64");

open MAIL, "| /usr/lib/sendmail  -t -oi -oem" or die "open: $!";
$top->print(\*MAIL);
close MAIL;

 Para que funcione, necesitas instalar el modulo de perl MIME::Tools. Con
CPAN es facil. Prueba:

 perl -MCPAN -e shell

 y sigue las instrucciones.

					Saludos
-- 
 (o- Cristian Othon Martinez Vera <cfuga en itam mx>  Pulchrum est paucorum
//\     http://eniac.rhon.itam.mx/~cfuga/          hominum.
v_/_


---------------------------------------------------------------------
Lista de soporte de LinuxPPP
 Reglas de la lista en http://pepe.net.mx/reglas.html