correo

[Gunnar Wolf]

Lo malo de crear un alias (lo hice alguna vez) es que cualquiera puede
utilizarlo. Y si bien cualqueira peude consultar /etc/passwd, en realidad
son muy pocos los que lo harian. 

Tal vez seria buena idea crear una variable escalar que contenga a dichas
cuentas separadas por lo que mas te guste, y comparar contra esa variable.
O sea, la modificacion seria:

- Al principio:
$no_mandar=':root:bin:daemon:otro:uucp:mas:';

- Al entrar al ciclo foreach:
next if ($no_mandar =~ /:$cuenta:/);

Y ya con eso. 

> Que bonito :)
> sin embargo, faltaria añadirle algo para que no mande mail a las cuentas
> fantasmas no ? :)
> sino le vas a mandar el mail a bin, daemon, ... B)
> si la necesidad de mandar mail a todos tus usuarios,
> quisaz te conviene crear un alias "all" en /etc/aliases...
> 
> saludos
> 
> Olivier.
> 
> -----Mensaje original-----
> De: Gunnar Wolf <gwolf en campus.iztacala.unam.mx>
> Para: Chucho <macro en info.biomedicas.unam.mx>
> CC: ayuda en linux.org.mx <ayuda en linux.org.mx>
> Fecha: Miércoles, 29 de Marzo de 2000 12:14 p.m.
> Asunto: Re: correo
> 
> 
> > Hola, una disculpa porque no estoy inscrito a la lista y mando el correo,
> > mi pregunta basica es, como puedo mandar un correo electronico a mas 300
> > usuarios como root?? sin hacer tanto esfuerzo??? Muchas Gracias!
> 
> No lo he probado (de hecho, lo voy a escribir ahora mismo), pero puede ser
> algo asi:
> 
> open (PWD,'/etc/passwd');
> @cuentas='';
> while ($linea=<PWD>) {
> @elementos=split(/:/,$linea);
> push(@cuentas,$elementos[0]);
> }
> close(PWD);
> foreach $cuenta (@cuentas) {
> open(MAIL,"|/bin/mail $cuenta");
> print MAIL "Este es el tema del correo\n";
> print MAIL "Aqui pones el cuerpo del mensaje\n";
> print MAIL "Cuantas lineas hagan falta...\n"
> close(MAIL);
> }
> 
> Con eso, le mandas correo a todos tus usuarios.
> 
> -------------------------------------------------------------------
>            Gunnar Wolf    gwolf en campus.iztacala.unam.mx
>      Universidad Nacional Autónoma de México, Campus Iztacala
>   Jefatura de Sección de Admon. de Sistemas y Telecomunicaciones
>         Area de Seguridad en Computo - DCI - DGSCA - UNAM
> -------------------------------------------------------------------
>   Beginner thinks 1Kb == 1000 bytes.   Master knows 1Km == 1024m
> 
> 
> --
> Para desuscribirse, mande correo a: ayuda-unsubscribe en linux.org.mx
> Para comandos adicionales, envíelo a: ayuda-help en linux.org.mx
> 
> 
> -- 
> Para desuscribirse, mande correo a: ayuda-unsubscribe en linux.org.mx
> Para comandos adicionales, envíelo a: ayuda-help en linux.org.mx
> 


-------------------------------------------------------------------
           Gunnar Wolf    gwolf en campus.iztacala.unam.mx
     Universidad Nacional Autónoma de México, Campus Iztacala
  Jefatura de Sección de Admon. de Sistemas y Telecomunicaciones
        Area de Seguridad en Computo - DCI - DGSCA - UNAM
-------------------------------------------------------------------
  Beginner thinks 1Kb == 1000 bytes.   Master knows 1Km == 1024m


-- 
Para desuscribirse, mande correo a: ayuda-unsubscribe en linux.org.mx
Para comandos adicionales, envíelo a: ayuda-help en linux.org.mx