[Previo por Fecha] [Siguiente por Fecha] [Previo por Hilo] [Siguiente por Hilo]
[Hilos de Discusión] [Fecha] [Tema] [Autor]Gunnar Wolf escribió: > > > 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: ¿Y con qué se lo va a comer? con pan, perl, tortilla, c, etc... Saludos David -- David Limón Romero | mailto:dlr en bret com mx Hardware y Comunicaciones | http://linux.bret.com.mx/ Grupo Embotellador BRET | ICQ#:20804046 Puebla, Pue. México | Linux User#:62953 Tel. +52-2-2291100 Ext. 2308 | Powered by Linux! PGP Public Key: http://www.mega.net.mx/~dlr/dlr.pgp -------------------------------------------------------- You can still escape from the GATES of hell: Use Linux! -- Para desuscribirse, mande correo a: ayuda-unsubscribe en linux org mx Para comandos adicionales, envíelo a: ayuda-help en linux org mx