Форум АНТИЧАТ - Perl – лучший друг хакера.

Форум АНТИЧАТ (https://forum.antichat.xyz/index.php)

- Авторские статьи (https://forum.antichat.xyz/forumdisplay.php?f=31)

- - Perl – лучший друг хакера. (https://forum.antichat.xyz/showthread.php?t=136397)

лучший друг хакера - это обнальщик вепмони денег

ссори за оффтоп, не удержался

POS_troi

т.е. он все по одному сканирует ? ну это херня полная, если на самом деле так.
я думал ведется диапазон, тип 55.111.222.0 - 55.111.222.256 : 2000 и все. он сканирует хосты по наличие порта 2000

Цитата:

я думал ведется диапазон, тип 55.111.222.0 - 55.111.222.256 : 2000 и все. он сканирует хосты по наличие порта 2000

Он как раз весь диапазон и сканирует

Код:

  $host=$r1.".".$r2.".".$r3; #составляем предварительный адрес

   

   socket(SOCK, PF_INET, SOCK_STREAM, getprotobyname('tcp'));

   

  while($index<=255)

  {

  $host=host.".".$index; #составляем окончательный адрес

razb

а ну тогда нормально. надо пробовать. если и многопоточность был - вообше супиер был бы

Если уж учить Perl, то в первую очередь по этой книге - http://www.ozon.ru/context/detail/id/147137/ , а не по "освой за 24 часа/для чайников".

По поводу статьи. Не в обиду автору, но я так полагаю, что автор сам недавно начал программировать на Perl? Это видно по стилю. Конечно, хочется сразу помочь другим, как сам узнаёшь новое, но я бы не советовал спешить.
Немного по коду:
- почему нет use strict, use warnings? это сильно облегчает поимку ошибок, да и код чище и правильней будет;
- зачем излишняя интерполяция - $ftp->login("$loginftp", "$passftp") ;
- chomp($_); - это тоже лишнее, данная магическая переменная по умолчанию обрабатывается во многих функциях ( если не указан аргумент ), что относится и к chomp;
ну и так далее, можно откомментировать практически каждую строку, но лучше почитать вот это:
http://www.milw0rm.com/papers/194 и остальные выпуски.

В общем, надеюсь мои ссылки помогут, никого не хочу обидеть, в конце-концов, все учатся.

Цитата:

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

#!usr/bin/perl -w !!! :D

если ты знаешь между ними разницу, то что смешного?

В общем, чтобы не разводить флейм и не создавать конфликтов, советую почитать perllexwarn - там хорошо описано что такое use warnings и что такое флаг -w.

Да мог-бы кто выложить пример backconnect на perl?

эм ребят - вы вобще статью читаете? или сразу идете комментировать?)

ТС, а как же многопоточность? имхо это одно из главных преимуществ перле перед многими интерпретируемыми языками программирования.

ИМХО, целью ТС было не демонстрация своих хацкерских скриптов на perl, а всего лишь показать, что умение програмировать на перл - это очень полезный скил )
и не стоит тыкать пальцем и кричать "фууунах, без многопоточности!!!"

Касаемо книг.
Ларри Уолл, конечно, мужик хороший, однако сразу начинать изучать перл с его книги - это грудью на амбразуру. Есть замечательная книга того же издательства (O'Relly)
_http://www.ozon.ru/context/detail/id/1704906/ - она больше подойдёт новичку, ИМХО.

А насчёт "лучшего друга"... наверное, это всё-таки мозг )