1MB2HBuzi4LQ9XZwtQ3GzRGombGx72LUPZ
1F9UeZCMcSfdYpVwSFfbaWQxK4p7FER79k
Not really familiar with github but here is the script I was using:
#!/usr/bin/perl
use Digest::SHA;$|=1;
open(VG, "./vanitygen -q -k 1 |");
while(){print $_;chomp($_);
$msg=$_;if(/Address: (.*)/ig){$addr=$1;
$hash=Digest::SHA::sha1_hex(Digest::SHA::sha1_hex($addr));
$id=substr($hash,0,2);
$id.=hex(substr($hash,2,1))%8;
$id.=hex(substr($hash,3,1))%4;
$id.=hex(substr($hash,4,1))%4;
$id.=hex(substr($hash,5,1))%2;
$id.=int(hex(substr($hash,6,1))/4);
$id.=int(hex(substr($hash,8,1))/4);
$id.=int(hex(substr($hash,10,1))/4);
$id.=int(hex(substr($hash,12,1))/4);
$id.=int(hex(substr($hash,14,1))/4);
$id.=int(hex(substr($hash,16,1))/4);
$id.=hex(substr($hash,18,1));
print "Identicon: $id \n";
if($seen{$id} ne ''){
print "Match found\n".$seen{$id}."\n$1\n";exit;
}$seen{$id}=$1;
}
}
That's picking 32 bits out of the hash for the identicon string, to add more bits and get more accurate I would add more bits on the end of the colors that are using just 2 bits per channel there. Notice that it just checks for a match against any icon it has found so far, to match a particular one you would find an identicon string for it from the same bits and just search for that, to search an address prefix as well you can change the vanitygen argument. I also was running on a machine with 8GB RAM, run at your own risk with more bits or less RAM when saving every result like this.