Показать сообщение отдельно

  #288  
Старый 07.02.2008, 00:55
FraiDex
Участник форума
Регистрация: 16.06.2006
Сообщений: 179
С нами: 10475029

Репутация: 135
По умолчанию

Скрипт для расшифровки MD5
PHP код:
# Perl 
# Md5 MultiCracker 
# Author : Cod3rZ 
# Usage : perl md5.pl [hash] 
# Usage: perl md5.pl 27d34b40d7adafe2e00c3503543e0ca9 
# Thanks to GrabberGhost 

use LWP::UserAgent
use 
HTTP::Request::Common

system("cls"); 
print 
q{ --------------------------------------------------------------------- 
                         :: 
Md5 MultiCracker :: 
 --------------------------------------------------------------------- 
 
Author Cod3rZ 
 Email  
songforthemoment@yahoo.it 
 Site   
http://cod3rz.helloweb.eu 
 
--------------------------------------------------------------------- 
}; 
$hash $ARGV[0]; 
chomp($hash); 

   if(!
$hash) { 
print 
qUsageperl md5.pl [hash
 
Usageperl md5.pl 27d34b40d7adafe2e00c3503543e0ca9 
 
--------------------------------------------------------------------- 
}; 
} else { 

$lwp LWP::UserAgent->new

#Milw0rm 

$ua $lwp->request(POST 'http://www.milw0rm.com/cracker/search.php'

hash => "$hash"
Submit => 'Submit'
]); 
@
content split(/[n]/, $ua->content); 
@
password split( /[><]/, $content[46]); 
if(
$password[1]) { print " Password cracked: $password[1] \n ---------------------------------------------------------------------"; } 
else { 


#Rednoize 

$red $lwp->request(GET 'http://md5.rednoize.com/?p&s=md5&q='.$hash); 
$content $red->content
if(
$content) { 
print 
" Password cracked : $content \n ---------------------------------------------------------------------"
} else { 


#GdataOnline 

$gdo $lwp->request(GET 'http://gdataonline.com/qkhash.php?mode=xml&hash='.$hash); 
@
content split(/<result>/, $gdo->content); 
@
password split( /[><]/, $content[1]); 
if(@
password[0]) { 
print 
" Password cracked: @password[0]\n ---------------------------------------------------------------------"

else { print 
" Password Not Cracked\n ---------------------------------------------------------------------"; } 
 } } } 
 
Ответить с цитированием