Супер капча

Категория: Perl , Веб-мастеру Комментариев: 17

Простая капча
Убойная капча, для защиты не только от спамеров, но и армии злостных школьнегов.

Для защиты от абсолютно деревянных школьнегов можно использовать капчу попроще:
Средняя капча

А от более-менее вменяемых — посложнее:
Сложная капча

А вот, собственно, и код:

# Функция генерации антиспам-сообщения
sub new_capcha{
my $rand_max = int('1' . '0' x 500); # Максимально возможное число для капчи
my $expressions_max = 50; # Максимальное число математических действийmy @signs = ('+', #
'-', # Допустимые операции с числами
'*', # в тексте капчи
'/');#
my $expression = int(rand($rand_max)) . ' ';
my $expressions_count = 1 + int(rand($expressions_max - 1));
for (my $i = 0; $i < $expressions_count; $i++){
$expression .= ' ' . $signs[int(rand(@signs))] . ' ' . int(rand($rand_max));
}
return $expression;
}

Проверка правильности ответа:

 my ($capcha_result, $capcha_val) = @_;
my $capcha_result_tmp = eval($capcha_val . " =");
if ($capcha_result != $capcha_result_tmp) {
return 'Извините, Вы слишком тупы для продолжения регистрации.';
}

Автор: Кто-то   @   5 августа 2009 Комментариев: 17
Метки : , ,

Поблагодарить автора

Webmoney Z163628999150, R61715184597

Комментариев: 17

  • Гений

    Убойная капча, для защиты не только от спамеров, но и армии злостных школьнегов.

    Ахахахха! Долго смеялся :D D

  • 0t4

    хорошо что у тебя капчи нет. ненавижу ее как пользователь. больше всего добивает капча от ЖЖ — она такаааая непонятная часто бывает.

  • ВВВВВВВВВВВВВ

    ету капчу легко пройти с помощю пхп скрипта!

  • Кто-то

    Да Вы что ??! Какой кошмар!

  • Свин

    спасибо большое.

  • Сергей

    Я думаю тут просто спасибом не отделаешься, но честно признаюсь пока я в пхп не разбираюсь, надо собраться с силами и почитать на досуге.

  • Кто-то

    пока я в пхп не разбираюсь

    Да, оно видно, ибо это Perl :)

  • Talyusha

    Здорово! А то, что-то слишком легко живётся интернет пользователям :)

  • Артемка

    >>ету капчу легко пройти с помощю пхп скрипта!

    хах, ну и бред) прям леегко)

    небось, сам представление не знаешь что такое php, а от крутых кодеров слышишь, вот и хуйню несешь)

  • crystalbit

    боже :) я в принципе к себе на блог капчу не стал ставить, так как считаю, что любая, самая простая капча, может отпугнуть комментатора — картинка не загрузилась, лень считать или еще что-нибудь

  • Алексей

    Ниразу не защитит. Ломается как спичка.

  • Кто-то

    Спасибо, кэп!

  • Muta

    Убойная капча — класс.

  • brevno

    прикольно, а на пхп есть такая капча

  • Кто-то

    прикольно, а на пхп есть такая капча

    Это вопрос, или констатация факта?

  • Sandrik

    Если нужна термоядерная защита, то нужно тоже самое + непонятный шрифт + GD.

    Если для прикола, или от школоты — сойдет.

    А вообще капча меня раздражает. Любая.

  • Вася

    для капчи двойные игтегралы рулят:)


Leave a reply

;) :| :x :twisted: :) 8O :( :roll: :P :oops: :o :mrgreen: :lol: :idea: :D :evil: :cry: 8) :arrow: :? :?: :!:

Предыдущая запись
«
Следующая запись
»