-=lebed=-, я так понял тебе это нужно для античатовского онлайн md5 чекера?
Раз такое дело, я не поленился и нашел 100%-й и очень простой способ обхода капчи
Ребята с md5search.uk.to предлагают поисковый плагин для лисы, который может обращаться к скрипту, используя "секретный" токен
md5s, токим образом забивая на картинку.
Я написал под этот баг небольшой скриптец на перле:
Код:
#! /usr/bin/perl -w
# MD5Searcher by Tarigonik =)
# USING: md5s.pl hash [top OR all]
# Where top - searching on 5 servers, all - on 35 )) (default "top")
use LWP::UserAgent;
$server = "top";
if (@ARGV == 0) { die "Need hash!\n" }
($hash, $server) = @ARGV;
if (@ARGV == 1) {$server = "top"}
open (OUT, ">out.html") || die "Can't write in file!: $!"; #Debug
my $ua = LWP::UserAgent->new(agent=>'Mozilla/5.0 (Windows NT 5.1) Gecko/20071127 Firefox/2.0.0.11',
timeout=>120);
$req = $ua->post('http://md5search.uk.to/index.php',
{ hash => $hash,
server => $server,
token => "md5s",
tryb => "search" });
my $content = $req->content;
print OUT $content;
my @res = $content =~ /"green">(.*?)<\/font/g;
if ($req->is_success && $1 ne "Not found") {
foreach (@res) {
print "Password = $_" if $_ ne "Not found"; }}
elsif ($req->is_error) {print "\nERROR! TRY AGAIN!\n"}
else { print "Password Not Found"}
close (out);
Использовать собственно так:
Код:
md5s.pl hash [servers]
где "servers" может быть "top" - проверять хеш по 5 основным серверам, а "all" - по всем 35 (по умолчанию top), так же можно чекать отдельно по каждому, указывая его идентификатор, но думаю это не нужно.
Вобщем юзайте на здоровье, и присобачьте этот сервис к своему онлайн чекеру =)