Everybody knows services like milw0rm.com‘s md5 cracking database, where you can submit a hash and get the plaintext password, if it is cracked. Today I discovered Digest::MD5::Reverse, a perl module to search several online MD5 hash databases.
So I whipped up a little script to lookup md5 hashes, to place in my ~/bin:
#!/usr/bin/perl
use strict;
use Digest::MD5::Reverse;
my $hash = shift || die ("Usage: lookup_md5.pl hash\n");
my $reversed = reverse_md5($hash);
if( defined $reversed) {
print $reversed . "\n";
} else {
exit 1;
}
Pretty simple, but I’m sure it will be a useful tool. 
Related posts:
- Controlling transmission using json-rpc in perl
- A simple reverse shell in jsp
- Macbook tiltsensor and Perl
- LWP::UserAgent and HTTPS
- How to make plenty of $$$ on twitter
Tags: development, md5, perl, security
Copyright © 2010 Jannich Brendle's blog All rights reserved. Amazing Grace theme by