Почему брутфорс на перле глохнет не пробрутив весь список мыл?

УСТРАНЕНИЕ КОНКУРЕНТОВ. БЛОКИРОВКА ДОМЕНОВ, БЛОКИРОВКА ИНСТАГРАМ/ТЕЛЕГРАМ И ДРУГОЕ. ПРОВЕРЕННЫЙ СЕЛЛЕР.

НОВЫЕ ТОРГОВАЯ НОВОСТИ ЧАТ

Скрыть

		ANTICHAT > ПРОГРАММИРОВАНИЕ > PHP
Почему брутфорс на перле глохнет не пробрутив весь список мыл?

Страница 3 из 3

Опции темы

Поиск в этой теме

Опции просмотра

#21

23.09.2008, 18:13

Kaimi

Познавший АНТИЧАТ

Регистрация: 23.08.2007

Сообщений: 1,237

С нами: 9851426

Репутация: 1676

Цитата:

Kaimi, я согласен с тем что ошибка не из-за этого, но ты всё таки загрузи файлик с мылами на 1 гб и посмтрим прав я или нет ))

Файлик на 1 гб... большинство софта умрет от таких объемов, да пожалуй лучше было бы открывать хендл и читать построчно

#22

23.09.2008, 19:04

MaTpOc

Познавший АНТИЧАТ

Регистрация: 05.05.2008

Сообщений: 1,078

С нами: 9482786

Репутация: 1357

Цитата:

Сообщение от Spyder

MaTpOc
Диджимортал кедала, пару дней назад всё слилось в паблик но доступно только для узкого круга
Вот тебе пожалуй покажу, только тссссс! Больше некмоу не говори
http://search.cpan.org/~reatmon/IO-Socket-Socks-0.1/lib/IO/Socket/Socks.pm

Как это включить или куда вставить???

#23

23.09.2008, 21:29

~~Digimortal~~

Banned

Регистрация: 22.08.2006

Сообщений: 608

С нами: 10378404

Репутация: 1095

>> Как это включить или куда вставить???

Скачивешь модуль http://search.cpan.org/src/REATMON/IO-Socket-Socks-0.1/lib/IO/Socket/Socks.pm и помещаешь в ./lib/IO/Socket/ в дире, где установлен Perl. Затем переписываешь скрипт:
- добавляешь считывание соксов из файла в массив (этот модуль работает с socks5 только).
- заменяешь в скрипте "IO::Socket::INET" на "IO::Socket::Socks".
- там где создается объект сокета ("new IO::Socket::INET"), добавляешь еще параметры сокса - хост и порт:

Код:

Заместо:
          my $sock = new IO::Socket::INET
          (
          PeerAddr => 'vkontakte.ru',
             PeerPort => 80,
             PeerProto => 'tcp',
             TimeOut => 20
          ) or die "Can't connect\n";

делаем примерно так:

my $sock = new IO::Socket::Socks(ProxyAddr=>'proxy host',
                                  ProxyPort=>'proxy port',
                                  ConnectAddr=>'vkontakte.ru',
                                  ConnectPort=>80) or [тут_обработчик_отсутствия_коннекта];

http или https прокси реализовать можно легко и без дополнительных модулей - Kaimi написал уже...

Последний раз редактировалось Digimortal; 23.09.2008 в 21:34..

Страница 3 из 3

Предыдущая тема Следующая тема

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

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