Enviando un format por mail
Ernesto Hernandez-Novich
emhn at telcel.net.ve
Thu Mar 6 06:36:32 CST 2003
On Wed, 5 Mar 2003, Carlos Molina Garcia wrote:
> Me encuentro haciendo unos scripts, y me tope con algo que realmente no
> encuentro como solucionar de manera sencilla y eficiente.
> Se trata simplemente de enviar un formato por mail.
>
> El ejemplo siguiente servira para ver el formato
>
> format STDOUT_TOP =
>
> Item1 Directorio
> Status
> --------------- ------------------------------------------------
> ------
> .
> format STDOUT =
> @<<<<<<<<<<<<<< @<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
> @<<<<<<<<
> $key, $field, $summary{$key}{$field}
> .
>
> despues de hacer ciertas manipulaciones con las variables involucradas
> en el format, sigo con
> write STDOUT;
>
> El asunto es que deseo enviar por correo la salida de este format, pero
> como la funcion write solo funciona a nivel de filehandles (I/O), no
> encuentro una manera sencilla de hacerlo sin necesidad de escribir un
> archivo en disco, para despues enviarlo por correo , y posteriormente
> borrarlo.
El nombre de un formato está en relación con el filehandle sobre el cual
es aplicable. Crea un filehandle hacia un pipe que envíe correo y define
el formato con el mismo nombre del filehandle.
open(MAIL,"| mail foo at bar.com");
...
write MAIL;
...
format MAIL_TOP =
...
.
format MAIL =
...
.
--
Ernesto Hernández-Novich - Running Linux 2.4.19 i686 - Unix: Live free or die!
Geek by nature, Linux by choice, Debian of course.
If you can't apt-get it, it isn't useful or doesn't exist.
GPG Key Fingerprint = 438C 49A2 A8C7 E7D7 1500 C507 96D6 A3D6 2F4C 85E3
------------------------------------------------------------------------
Enviar e-mail a <majordomo at pm.org> colocando en el cuerpo:
"UNSUBSCRIBE caracas-pm-list" para desuscribirse.
"INFO caracas-pm-list" para conocer las reglas de etiqueta.
------------------------------------------------------------------------
More information about the caracas-pm
mailing list