comment
IRC Chat
play_arrow
Este sitio utiliza cookies propias y de terceros. Si continúa navegando consideramos que acepta el uso de cookies. OK Más Información.

MD5 Cracker Ataque por Wordlist

  • 0 Respuestas
  • 1098 Vistas

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

Desconectado @ed33x

  • *
  • Underc0der
  • Mensajes: 107
  • Actividad:
    0%
  • Reputación 0
    • Ver Perfil
    • Email
« en: Enero 27, 2011, 08:46:39 pm »
Código: Perl
  1. #!/usr/bin/perl
  2.  
  3.  
  4.  
  5. use strict;
  6.  
  7. use warnings;
  8.  
  9. use Digest::MD5 No tienes permisos para ver links. Registrate o Entra con tu cuenta(md5_hex);
  10.  
  11.  
  12.  
  13. sub usage(){
  14.  
  15.  
  16.  
  17. No tienes permisos para ver links. Registrate o Entra con tu cuenta "nt******** Splash Md5 cracker! *********nn";
  18.  
  19. No tienes permisos para ver links. Registrate o Entra con tu cuenta "t  Usage: $0 <hash-file> <wordlist>nn";
  20.  
  21. No tienes permisos para ver links. Registrate o Entra con tu cuenta "t**************************************nn";
  22.  
  23.  
  24.  
  25. }
  26.  
  27.  
  28.  
  29. my $hashplace=No tienes permisos para ver links. Registrate o Entra con tu cuenta;
  30.  
  31. my $wlistplace=No tienes permisos para ver links. Registrate o Entra con tu cuenta;
  32.  
  33.  
  34.  
  35. if(!$wlistplace){
  36.  
  37.     usage();
  38.  
  39.     No tienes permisos para ver links. Registrate o Entra con tu cuenta;
  40.  
  41. }
  42.  
  43.     No tienes permisos para ver links. Registrate o Entra con tu cuenta(HASH,$hashplace) || No tienes permisos para ver links. Registrate o Entra con tu cuenta "Could not open hash: $!n";
  44.  
  45.         No tienes permisos para ver links. Registrate o Entra con tu cuenta(my $hash=<HASH>);
  46.  
  47.     No tienes permisos para ver links. Registrate o Entra con tu cuenta(HASH);
  48.  
  49.  
  50.  
  51. if(No tienes permisos para ver links. Registrate o Entra con tu cuenta($hash)!=32){
  52.  
  53.     No tienes permisos para ver links. Registrate o Entra con tu cuenta "t$hash is not a valid md5-hash!n";
  54.  
  55. }
  56.  
  57. if($hash !~ /d|[a-f]{32}/g){
  58.  
  59.     No tienes permisos para ver links. Registrate o Entra con tu cuenta "t$hash is not a valid md5-hash!n";
  60.  
  61. }
  62.  
  63.     No tienes permisos para ver links. Registrate o Entra con tu cuenta(WLIST,$wlistplace) || No tienes permisos para ver links. Registrate o Entra con tu cuenta "Could not open wordlist: $!n";
  64.  
  65.  
  66.  
  67. while(<WLIST>){
  68.  
  69.     No tienes permisos para ver links. Registrate o Entra con tu cuenta($_);
  70.  
  71.     No tienes permisos para ver links. Registrate o Entra con tu cuenta(my $md5=md5_hex($_));
  72.  
  73.     No tienes permisos para ver links. Registrate o Entra con tu cuenta "$md5 != $hashn";
  74.  
  75.     if($md5 eq $hash){
  76.  
  77.         No tienes permisos para ver links. Registrate o Entra con tu cuenta "tHash successfully cracked!nnt$hash == $_nn";
  78.  
  79.     }
  80.  
  81. }
  82.  
  83. No tienes permisos para ver links. Registrate o Entra con tu cuenta(WLIST);
  84.  
  85.  
  86.  
  87. No tienes permisos para ver links. Registrate o Entra con tu cuenta "Hash not found in wordlistn";
« Última modificación: Marzo 14, 2015, 09:51:50 am por Expermicid »
Me cambie de messenger ahora es: edeex@live.comNo tienes permisos para ver links. Registrate o Entra con tu cuenta

 

¿Te gustó el post? COMPARTILO!



[Perl] Pass Cracker By DOddy H

Iniciado por BigBear

Respuestas: 0
Vistas: 907
Último mensaje Julio 03, 2011, 09:48:52 pm
por BigBear
[Perl] Mysql Cracker

Iniciado por BigBear

Respuestas: 0
Vistas: 996
Último mensaje Julio 03, 2011, 10:03:43 pm
por BigBear