Mayo 20, 2018, 10:55:28 pm

Autor Tema: [Ruby] Whois Online 0.1  (Leído 708 veces)

0 Usuarios y 1 Visitante están viendo este tema.

Desconectado BigBear

  • Yo vivo en CPH
  • ***
  • Mensajes: 736
  • Sexo: Masculino
    • Ver Perfil
[Ruby] Whois Online 0.1
« en: Abril 23, 2012, 09:13:02 am »
Un simple script en Ruby para hacer un whois al dominio que quieran.

Código: You are not allowed to view links. Register or Login
#!usr/bin/ruby
#Whois Online 0.1
#Coded BY Doddy H

require "net/http"

def head()
  print "\n-- == Whois Online 0.1 == --\n\n"
end
 
def sintax()
  print "\n[+] Sintax : ruby domain.rb <domain>\n"
end
 
def copyright()
  print "\n\n(C) Doddy Hackman 2012\n\n"
end
 
def tomar(web,par)
  return Net::HTTP.post_form(URI.parse(web),par).body
end

def whois(dom)
  code = tomar("http://networking.ringofsaturn.com/Tools/whois.php",{"domain"=>dom,"submit"=>"submit"})
  if  code=~/<pre>(.*?)<\/pre>/mi
    final = $1
    final = final.sub(/&quot;/,"")
    final = final.sub(/&gt;&gt;&gt;/,"")
    final = final.sub(/&lt;&lt;&lt;/,"")
    return final
  else
    return "Not Found"
  end
end

domain = ARGV[0]

head()
if !domain
  sintax()
else
  print whois(domain)
end
copyright()
   
#The End ?


exclamation
[Perl Tk] Whois Online 0.1

Iniciado por BigBear

0 Respuestas
697 Vistas
Último mensaje Abril 23, 2012, 09:14:17 am
por BigBear
exclamation
[Python] Whois Online 0.1

Iniciado por BigBear

0 Respuestas
1061 Vistas
Último mensaje Abril 23, 2012, 09:13:22 am
por BigBear
exclamation
[Perl] Whois Online 0.1

Iniciado por BigBear

0 Respuestas
721 Vistas
Último mensaje Abril 23, 2012, 09:14:00 am
por BigBear
exclamation
[PyQT4] Whois Online 0.2

Iniciado por BigBear

2 Respuestas
1268 Vistas
Último mensaje Agosto 26, 2012, 08:33:44 pm
por JaAViEr
exclamation
[Ruby] Diccionario Online 0.1

Iniciado por BigBear

0 Respuestas
648 Vistas
Último mensaje Marzo 18, 2012, 07:01:33 pm
por BigBear
exclamation
[Ruby] Simple Backdoor in Ruby

Iniciado por BigBear

0 Respuestas
990 Vistas
Último mensaje Marzo 25, 2011, 01:34:44 pm
por BigBear
xx
Qué es un WHOIS??

Iniciado por Marcelita1000

7 Respuestas
1769 Vistas
Último mensaje Junio 05, 2009, 08:11:55 am
por messerschmitt
xx
whois?????????

Iniciado por cirros

1 Respuestas
1550 Vistas
Último mensaje Enero 02, 2006, 03:21:30 pm
por sdrako
exclamation
[Perl TK] Client WhoIs

Iniciado por BigBear

0 Respuestas
756 Vistas
Último mensaje Mayo 26, 2011, 07:07:28 pm
por BigBear
exclamation
[Java] Whois Manager 0.2

Iniciado por BigBear

0 Respuestas
1998 Vistas
Último mensaje Abril 30, 2016, 09:28:21 am
por BigBear