Форум АНТИЧАТ

Форум АНТИЧАТ (https://forum.antichat.xyz/index.php)
-   PHP, PERL, MySQL, JavaScript (https://forum.antichat.xyz/forumdisplay.php?f=37)
-   -   perl script (https://forum.antichat.xyz/showthread.php?t=21986)

genom-- 27.07.2006 02:32

perl script
 
я написал брутер md5 хэшей на перле теперь вы сможете запречь расшифровкой не свой домашний комп а атакуемый сервер сливать тут http://www.genom-psixoz.narod.ru/md5.pl

также я еще написал качалку файлов -- она может прикодиться вам если недай ог вы залезли на сервак а на нем нету ни wget-a ни других качалок-- скопируете код в новый файл и заливайте шелл --качать тут http://www.genom-psixoz.narod.ru/wget.pl


еще я написал скрипт который выдирает из файлов мыла и саписывает их в файл-- пока файлы из которых нужно читать нужно прописывать-- но в ближайшем будущем я его допишу и он будет автоматически сканировать все файлы и выдирать оттуда мыла--- так взломал сервак -- порутал--сапустил скрипт и через 5 минул у тебя готовый к продаже спам лист качайте отсюда http://www.genom-psixoz.narod.ru/e-mail_cut.pl

hidden 27.07.2006 06:31

Это ты конечно неплохо написал, проги на перле с окнами, держи плюс, но я сомневаюсь что оконный интерфейс, это то-что надо для отаки на сервер, хотя смотря что ты подразумеваешь под словом "залезли".
Цитата:

скопируете код в новый файл и заливайте шелл
Не проще ли скопировать шэл, вместо этой качалки ;).
А насчёт выдерания мэилов, так думаю будет проще, + повторяющиеся отсеяться.
Код:

#!/usr/bin/perl

if (@ARGV < 1) { print "Usage: script.pl source.txt destination.txt\n"; exit; }

($src, $dest) = @ARGV;

open(IN, $src) || die "Can't read $src\n";
read(IN, $buf, -s$src);
close(IN);

while($buf =~ /\b([\w\d]+\@[\w\d]+\.[\w\d\.]+)\b/g) { $list{"$1"} = ""; }

open(OUT, ">$dest") || die "Can't write $dest\n";
$, = ';';
print OUT keys %list;
close(OUT);


bul.666 27.07.2006 10:23

Цитата:

также я еще написал качалку файлов -- она может прикодиться вам если недай ог вы залезли на сервак а на нем нету ни wget-a ни других качалок-- скопируете код в новый файл и заливайте шелл --качать тут http://www.genom-psixoz.narod.ru/wget.pl
Если залезли на сервак, то полюбому через шелл... =) Мы залезли, качалок там нет... Придется опятьже через ШЕЛЛ писать твой скрипт, чтобы потом залить шелл... =) Смешно =)

genom-- 27.07.2006 20:14

ну не обязательно ты залез через шелл--вдруг --у них бага на команды-- а качалки нету-- че ты делать будешь??????это к бул666

лана новый релиз моего псевдо гения как и обещал автоматическая выдиралка e-mail-oв из файлов.-- в качестве параметра использует имя директории---- и проверяет все вложенные файлы и папки--- все коменты внутри скрипта http://www.genom-psixoz.narod.ru/spam-bilder.pl

zeppe1in 27.07.2006 21:11

Я тоже против окошек.

hidden 27.07.2006 21:17

Цитата:

Сообщение от zeppe1in
Я тоже против окошек.

Нет я не против окошек, когда пишешь утилиту для локального использования, но когда ты зашол через шэл на удалённый сервер, мало того что эту качалку надо как-то поместить на этот сервер, но ищё и после её запуска, любовалься обошком будет только администратор этого сервера ;) :)

genom-- 27.07.2006 21:38

да фиг с ней с качалкой =)

zeppe1in 27.07.2006 23:50

Ну я это и имел ввиду. Ещо гуёвый эксплойт от рст тоже барахло.

da_ff 29.07.2006 14:48

Не сочти за критику, но помоему, не стоит выводить результат в подпрограмме, лучше возвращать результат типа «0» или «хеш», и уже в основной части принимать решение «BCE XyeBO» или «BCE 3AEbiCb», а так спасибо я с перлом плохо знаком, никогда не доводилось рисовать формы, а теперь вот увидел на примере.

genom-- 29.07.2006 15:48

критика -- правильная --- вспринял и решил что ты прав -- так будет красивеее


Время: 09:12