Archives: January 2009

Conocer los Vhost de una direccion IP

0

11 January 2009 at 21:16 Filed in:Uncategorized

Les dejo un script el cual tiene como funcion darnos los virtual hosts pertenecientes a una direccion IP.

CODE:
  1. use LWP::Simple;
  2. if ( @ARGV != 1 ) {
  3.  
  4. die "\nUse: $0 <ip>\n\n"
  5.  
  6. . "   <ip>    Direccion IP del servidor web         [ej -> 84.16.233.253]\n";
  7.  
  8. }
  9. $host= $ARGV[0];
  10. chomp $host;
  11. $url = get "http://www.robtex.com/ip/$host.html";
  12. while ( $url =~ m{
  13. <td class=td0 rowspan="1"><a xhref="http://www.robtex.com/dns/(.*?)"}g ) {
  14. print "$1\n";
  15. }

Ejemplo:

# perl ipvhost.pl 84.16.233.253
84-16-233-253.internetserviceteam.com.html
artstux.net.html
mail.rcm-argentina.com.ar.html
mavensearch.net.html
ns1.rcm-argentina.com.ar.html
rcm-argentina.com.ar.html
recortable.net.html
www.rcm-argentina.com.ar.html
ns1.artstux.net.html

Gracias explorer de perl en español por la ayuda :d

Notificacion al conectarse el usuario root

0

9 January 2009 at 17:26 Filed in:Uncategorized

Para realizar lo mencionado en el titulo debemos realizar el siguiente procedimiento:
Editamos o creamos el archivo /root/.bash_profile y agregamos lo siguiente a lo ultimo.

echo 'ALERTA - El usuario ROOT se conecto :' `date` `who` | mail -s "Alerta: Acceso ROOT " info@dominio.com.ar

Fuente: webhostinghispano.com/forums/showthread.php?t=1317