перловый скриптик для брута MD5 хеша...
<?php
// MD5 simple pass checker
//
// GNU GENERAL PUBLIC LICENSE
// Version 2, June 1991
//
// Copyright © 2004 - 2005 nerezus
// 007NOT@ - 2006 - make nice view
$form = "<form action=\"?\" method=\"post\">
<b>Input here your info:</b>
Your md5 hash:
<input type=\"text\" name=\"h\" size=\"32\" maxlength=\"32\" value=\"34823136d0dd91d0f5d22db740f7679c\">
Symbols:
<input type=\"text\" name=\"s\" size=\"86\" maxlength=\"120\" value=\"1234567890abcdefghijklmnopqrstuvwxyz ABCDEFGHIJKLMNOPQRSTUVWXYZ.,!@#$%^&*()_-=+\">
Length:
<input type=\"text\" name=\"l\" size=\"1\" maxlength=\"1\" value=\"4\">
Your Email:
<input type=\"text\" name=\"email\" size=\"20\" maxlength=\"40\" value=\"vasya_pupkin@mail.ru\">
<input type=\"submit\" value=\"Check!\">
</form>";
$h = $_POST[h];
$s = $_POST[s];
$l = $_POST[l];
$email = $_POST[email];
$nl=ignore_user_abort (1);
set_time_limit(0);
if(!isset($h))
{
$h='';
}
if ($h == "")
{
echo "$form";
}
else
{
$s="|".$s;
for ($a1=0; $a1 < strlen($s); $a1++)
{
for ($a2=0; $a2 < strlen($s); $a2++)
{
for ($a3=0; $a3 < strlen($s); $a3++)
{
for ($a4=0; $a4 < strlen($s); $a4++)
{
$p="";
if ($s[$a1] != "|")
{
$p=$p.$s[$a1];
}
if ($s[$a2] != "|")
{
$p=$p.$s[$a2];
}
if ($s[$a3] != "|")
{
$p=$p.$s[$a3];
}
if ($s[$a4] != "|")
{
$p=$p.$s[$a4];
}
if (md5($p) == $h)
{
mail("$email", "md5", "Password checked! $p");
echo "Password checked!
$p";
break (4);
}
}
}
}
}
}
?>