Devilzc0de Forum Follow @devilzc0de
  • Home
  • Hacking
  • Networking
  • Programming
  • O.S
  • Server
  • Tweets
  • Search
  • Member List
  • Calendar
Current time: 05-22-2013, 03:51 AM Hello There, Guest! (Login — Register)
Devilzc0de Forum › Information Technology › File Sharing › Software v
« Previous 1 ... 8 9 10 11 12 ... 24 Next »

[oz] MD5 crack perl

Home General Computer Multimedia Business Lounge

Pages (2): « Previous 1 2
Post Reply 
Tweet
Threaded Mode | Linear Mode
[oz] MD5 crack perl
12-21-2011, 10:05 PM
Post: #11
Danzel Offline
DC Ambassadors
***
Posts: 128
Joined: Apr 2010
Reputation: 25
RE: [oz] MD5 crack perl
(02-09-2011 11:18 AM)Liyan oz Wrote:  Assalamualaikum,, tadi jalan2 di anak2 haxor eh nemu ini..

ini perl md5 cracker.. mainan buat temen2 di DC ini, wowoowkk

kalo repost,, delete aja ya..

yang mau bantuin ane buat .NET protector PM aja,, terusin SCnya,,

males ngetik,, wkwkwksantaiasikngambek

Code:
#!/usr/bin/perl

use strict;
use warnings;
use Digest::MD5 qw(md5_hex);

sub usage(){

print "\n\t******** ATH Md5 cracker! *********\n\n";
print "\t  Usage: $0 <hash-file> <wordlist>\n\n";
print "\t**************************************\n\n";
print "\t[ Powered by Devilzc0der oz ]\n\n";


}

my $hashplace=shift;
my $wlistplace=shift;

if(!$wlistplace){
   usage();
   exit;
}
   open(HASH,$hashplace) || die "Could not open hash: $!\n";
      chomp(my $hash=<HASH>);
   close(HASH);

if(length($hash)!=32){
   die "\t$hash is not a valid md5-hash!\n";
}
if($hash !~ /\d|[a-f]{32}/g){
   die "\t$hash is not a valid md5-hash!\n";
}
   open(WLIST,$wlistplace) || die "Could not open wordlist: $!\n";

while(<WLIST>){
   chomp($_);
   chomp(my $md5=md5_hex($_));
   print "$md5 != $hash\n";
   if($md5 eq $hash){
      die "\tHash successfully cracked!\n\n\t$hash == $_\n\n";
   }
}
close(WLIST);

print "Hash not found in wordlist\n";

hehehe,, ini perl md5 cracker,,

kalo mau ganti tinggal edit ininya

Code:
print "\n\t******** ATH Md5 cracker! *********\n\n";
print "\t  Usage: $0 <hash-file> <wordlist>\n\n";
print "\t**************************************\n\n";
print "\t[ Powered by Devilzc0der oz ]\n\n";

huhuy,,, enaknya kalo bisa dapat SC terus main2 dech..

wassalam

idk what u ppl are writing here . coz i not understand indonesian language .. but changin copyright of a tool it's a bad way

this is a tool from old darkc0de forum
and here it's original source

Code:
#!/usr/bin/perl

use strict;
use warnings;
use Digest::MD5 qw(md5_hex);

sub usage(){

print "\n\t******** Splash Md5 cracker! *********\n\n";
print "\t  Usage: $0 <hash-file> <wordlist>\n\n";
print "\t**************************************\n\n";

}

my $hashplace=shift;
my $wlistplace=shift;

if(!$wlistplace){
   usage();
   exit;
}
   open(HASH,$hashplace) || die "Could not open hash: $!\n";
      chomp(my $hash=<HASH>);
   close(HASH);

if(length($hash)!=32){
   die "\t$hash is not a valid md5-hash!\n";
}
if($hash !~ /\d|[a-f]{32}/g){
   die "\t$hash is not a valid md5-hash!\n";
}
   open(WLIST,$wlistplace) || die "Could not open wordlist: $!\n";

while(<WLIST>){
   chomp($_);
   chomp(my $md5=md5_hex($_));
   print "$md5 != $hash\n";
   if($md5 eq $hash){
      die "\tHash successfully cracked!\n\n\t$hash == $_\n\n";
   }
}
close(WLIST);

print "Hash not found in wordlist\n";
Visit this user's website Find all posts by this user
Quote this message in a reply
12-21-2011, 10:16 PM
Post: #12
Super Moderator Offline
Wahyu Adi Prasetyo
****
Global Moderators
Posts: 6,942
Joined: Jan 2010
Reputation: 237
RE: [oz] MD5 crack perl
hmm,,need confirmation from oz himself,but i don't know this tool from your forum and has copyrighted ketawa
Visit this user's website Find all posts by this user
Quote this message in a reply
12-21-2011, 10:34 PM
Post: #13
Fauzi Topan Offline
PacarNya Yuki Kato
Posts: 314
Joined: Nov 2011
Reputation: 55
RE: [oz] MD5 crack perl
(12-21-2011 10:05 PM)Danzel Wrote:  .. but changin copyright of a tool it's a bad way

Agree piss
Visit this user's website Find all posts by this user
Quote this message in a reply
12-21-2011, 11:03 PM
Post: #14
anko_kum4ru Offline
./b0k3p3r_4r34
****
Global Moderators
Posts: 1,451
Joined: Dec 2010
Reputation: 10
RE: [oz] MD5 crack perl
sorry br0o.. piss
I very don't agree to change copyright.. ketawa
maybe we could wait for an explanation of Liyan oz ... ketawa
Visit this user's website Find all posts by this user
Quote this message in a reply
« Next Oldest | Next Newest »
Pages (2): « Previous 1 2
Post Reply 


Topic Tools
Topic Link :
BBCode :
HTML Code :
View a Printable Version Send Thread to a Friend Subscribe to this thread
Submit Google Submit Face book Submit to Digg Submit to Reddit Submit to Furl Submit to Del.icio.us Submit to Jeqq

Possibly Related Threads...
Thread: Author Replies: Views: Last Post
  Crack Adobe CS6 Mastel collection beg3nk newb1e 2 109 01-08-2013 11:58 PM
Last Post: beg3nk newb1e
Thumbs Up TeamViewer v7.0.12313 Premium Full Crack royvandi 11 372 09-25-2012 03:24 PM
Last Post: brianfahmi
Wink [Ask] ada yang punya crack or serial gak ?? loge_zore 1 187 08-31-2012 08:40 PM
Last Post: momodrock
  mIRC v7.22 + Crack-Serials l0c4l r00t 3 542 04-29-2012 03:54 PM
Last Post: momodrock
Heart Acunetix Web Vulnerability Scanner v.7.0 + Crack redbastard 18 2,231 03-22-2012 11:15 PM
Last Post: CyberKaze
  ada yang tau crack nya camsfrog gory 14 1,559 09-14-2011 04:02 PM
Last Post: lonely.army
  [Ask] connectify pro v3.0 full crack ery 2 615 09-08-2011 02:25 AM
Last Post: ery
  Internet Downloads Manager 6.05 + Crack ./blacknotes 11 590 06-05-2011 10:28 PM
Last Post: sir_rotlez
  [Tutor] Kaspersky 2011 Anti Blacklist Crack blu3k1d5 7 695 06-05-2011 12:53 PM
Last Post: Mr.ping
Wink crack atau key gen sang singa malam 9 630 04-14-2011 05:07 AM
Last Post: Wayc0de

Users Browsing
1 Guest(s)

  • Contact Us
  • devilzc0de
  • Return to Top
  • Mobile Version
  • RSS Syndication
  • Help
Current time: 05-22-2013, 03:51 AM Powered By MyBB, © 2002-2013 MyBB Group. Theme created by Justin S. | Mixed By Chaer.Newbie | Fixed By Aditya

USING THIS SITE INDICATES THAT YOU HAVE READ AND ACCEPT OUR TERMS. IF YOU DO NOT ACCEPT THESE TERMS, YOU ARE NOT AUTHORIZED TO USE THIS SITE