¿Como enviar un email en PERL?
Primero antes que nada para poder enviar correos en PERL necesitamos un servidor de correo instalado, en este caso usaremos SENDMAIL, por lo que es necesario que lo tengas instalado para que este script funcione:
Bueno empezamo el scipt:
#!/usr/bin/perl#Primero definimos la ruta en la que tenemos instalado PERL
#Despues abrimos sendmail con el pipe |#y creamos un manejador llamado MAILopen(MAIL,"|/usr/sbin/sendmail -t") || die "La llamada a sendmail ha fallado";
#Despues escribimos a el manejador MAIL todos los datos del correo
#Escribimos el destinatarioprint MAIL "To: nombre@correo.com\n";
#Escribimos de quien provieneprint MAIL "From: de@vorreo.com\n";
#si queremos que una copia le llegue a otro destinatarioprint MAIL
...

Siempre es bueno desactivar servicios y cerrar puertos que nunca usamos, por eso aqui va este pequeño truco para cerrar el puerto 6000 del servidor X para todos los que usan gdm.
Ethical Hacking
Un término usado en la industria del IT (tecnologÃÂas de la
información), en donde se supone que una Empresa,
Instutución o Gobierno contrata los servicios de uno o varios
Hacker para hacer una AuditorÃÂa al sistema computacional de
dicha institución.
Esta se divide en 2 pasos:
Realizar un ataque desde el exterior: este consiste en atacar la
página web, entrar a la red interna, ganar acceso de
administrador, escanear puertos, buscar hoyos en servidores de
aplicaciones, busqueda de debilidades en el sistema de correos, etc. y
todas las artimañas para vulnerar el sistema desde clientes
remotos.
Realizar un ataque desde la red interna: consiste en ...







