HOME FORUMS MEMBERS RECENT POSTS LOG IN  
× Авторизация
Имя пользователя:
Пароль:
Нет аккаунта? Регистрация
Баннер 1   Баннер 2
НОВЫЕ ТОРГОВАЯ НОВОСТИ ЧАТ
loading...
Скрыть
Вернуться   ANTICHAT > ПРОГРАММИРОВАНИЕ > PHP
Перезагрузить страницу Небольшая головоломка на Perl
   
Ответ
Страница 1 из 2 1 2 >
 
Опции темы Поиск в этой теме Опции просмотра

Небольшая головоломка на Perl
  #1  
Старый 05.07.2007, 13:17
KSURi
Постоянный
Регистрация: 06.06.2006
Сообщений: 515
С нами: 10489346

Репутация: 963


По умолчанию Небольшая головоломка на Perl
Некое подобие keygenme на Perl
Мой первый опыт так сказать)
В пм присылайте или просто подходящие ключи, или детально описанный алгоритм
Если пришлете одно из двух хек-слов, подходящих туда - ставлю репу ггг

Код:
#!perl -X
BEGIN { $SIG{INT} = sub { exit print '=(' } }
while(chomp($_=<STDIN>)){s/e/e/e;exit print'=('until!($+[0]+$-[0]!=3);/$_/ and $=+=ord$& foreach(split$,);goto SUCCESS unless $=!=(int oct'0x329')*(int(rand0xffffff)**int(rand1));exit print '=(';}
SUCCESS: exit print"\x44\x4f\x4e\x45\x21"
или тут: http://itdefence.ru/hauditor/keygenme.txt

ЗЫ: тока не надо мне ебать мозги по поводу "да проще сорец подправить" плз
𝕏 Twitter Reddit Telegram Копировать ссылку
Последний раз редактировалось KSURi; 06.07.2007 в 01:20..
 
Ответить с цитированием

  #2  
Старый 05.07.2007, 13:25
Digimortal
Banned
Регистрация: 22.08.2006
Сообщений: 608
С нами: 10378404

Репутация: 1095


По умолчанию
>> Если пришлете одно из двух хек-слов, подходящих туда - ставлю репу ггг

а почему тока двух ? их там многа можна придумать.. )
 
Ответить с цитированием

  #3  
Старый 05.07.2007, 13:29
KSURi
Постоянный
Регистрация: 06.06.2006
Сообщений: 515
С нами: 10489346

Репутация: 963


По умолчанию
Цитата:
Сообщение от Digimortal  
>> Если пришлете одно из двух хек-слов, подходящих туда - ставлю репу ггг

а почему тока двух ? их там многа можна придумать.. )
Ну два которых мне больше всего нравятся)
 
Ответить с цитированием

  #4  
Старый 05.07.2007, 16:50
slider
Members of Antichat - Level 5
Регистрация: 04.09.2005
Сообщений: 528
С нами: 10885346

Репутация: 2947


По умолчанию
мля... ниасилил...
вечером ещё раз попробую..
 
Ответить с цитированием

  #5  
Старый 05.07.2007, 20:46
Helios
Постоянный
Регистрация: 14.01.2007
Сообщений: 459
С нами: 10169427

Репутация: 589
По умолчанию
Мда, без perlvar'а сразу и не допер, а вообще прикольно=)
 
Ответить с цитированием

  #6  
Старый 06.07.2007, 00:29
[53x]Shadow
Leaders of Antichat
Регистрация: 25.01.2007
Сообщений: 341
С нами: 10153766

Репутация: 2565
По умолчанию
В принципе работает вот так без правки исходов
D:\>perl script.pl 111
DONE!
Вместо 111 любой набор в кач. параметров =)
 
Ответить с цитированием

  #7  
Старый 06.07.2007, 01:20
KSURi
Постоянный
Регистрация: 06.06.2006
Сообщений: 515
С нами: 10489346

Репутация: 963


По умолчанию
Цитата:
Сообщение от [53x]Shadow  
В принципе работает вот так без правки исходов
D:\>perl script.pl 111
DONE!
Вместо 111 любой набор в кач. параметров =)
Хитрюга) Поправил
 
Ответить с цитированием

  #8  
Старый 07.07.2007, 14:02
KSURi
Постоянный
Регистрация: 06.06.2006
Сообщений: 515
С нами: 10489346

Репутация: 963


По умолчанию
Что-то не густо народу взялось=\
 
Ответить с цитированием

  #9  
Старый 10.07.2007, 21:43
Digimortal
Banned
Регистрация: 22.08.2006
Сообщений: 608
С нами: 10378404

Репутация: 1095


По умолчанию
>> Что-то не густо народу взялось=\

мне кажется, надо было это в раздел "PHP, PERL, MySQL, JavaScript" выложить, ато в этот раздел перл-кодеры и не заглядуют особо..
 
Ответить с цитированием

  #10  
Старый 11.07.2007, 00:34
genom--
Постоянный
Регистрация: 09.07.2006
Сообщений: 937
С нами: 10441826

Репутация: 1686


По умолчанию
ксурь - ты опять за старое? =)
 
Ответить с цитированием
Ответ
Страница 1 из 2 1 2 >



« Предыдущая тема | Следующая тема »
Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Опасность ошибок Perl недооценивалась? 1251soldier Мировые новости. Обсуждения. 0 01.12.2005 20:56
Books Perl FRAGNATIC PHP 0 11.08.2005 16:58



Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
 


Быстрый переход




ANTICHAT ™ © 2001- Antichat Kft.