я написал брутер 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
Это ты конечно неплохо написал, проги на перле с окнами, держи плюс, но я сомневаюсь что оконный интерфейс, это то-что надо для отаки на сервер, хотя смотря что ты подразумеваешь под словом "залезли". Не проще ли скопировать шэл, вместо этой качалки . А насчёт выдерания мэилов, так думаю будет проще, + повторяющиеся отсеяться. Code: #!/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);
Если залезли на сервак, то полюбому через шелл... =) Мы залезли, качалок там нет... Придется опятьже через ШЕЛЛ писать твой скрипт, чтобы потом залить шелл... =) Смешно =)
ну не обязательно ты залез через шелл--вдруг --у них бага на команды-- а качалки нету-- че ты делать будешь??????это к бул666 лана новый релиз моего псевдо гения как и обещал автоматическая выдиралка e-mail-oв из файлов.-- в качестве параметра использует имя директории---- и проверяет все вложенные файлы и папки--- все коменты внутри скрипта http://www.genom-psixoz.narod.ru/spam-bilder.pl
Нет я не против окошек, когда пишешь утилиту для локального использования, но когда ты зашол через шэл на удалённый сервер, мало того что эту качалку надо как-то поместить на этот сервер, но ищё и после её запуска, любовалься обошком будет только администратор этого сервера
Не сочти за критику, но помоему, не стоит выводить результат в подпрограмме, лучше возвращать результат типа «0» или «хеш», и уже в основной части принимать решение «BCE XyeBO» или «BCE 3AEbiCb», а так спасибо я с перлом плохо знаком, никогда не доводилось рисовать формы, а теперь вот увидел на примере.
люди и еще проверьте кто нить знающий перл скрипт для сбора мыл -- втрой который0---- как он поведет себя на линуксе
Не сочти за критику, но помоему, не стоит выводить результат в подпрограмме, лучше возвращать результат типа «0» или «хеш», и уже в основной части принимать решение «BCE XyeBO» или «BCE 3AEbiCb», а так спасибо я с перлом плохо знаком, никогда не доводилось рисовать формы, а теперь вот увидел на примере.
вот воспринял критику правильную от tcover-а о том что как можно юзать удаленно переборщик md5 с гуи если у админа на экране появится окошко и все--- вот написал консолный брутер прямым перебором---- накрайняк можно сипользовать как досер т.к. то что он сжирает весь прац дык это точна--- качать тут http://www.genom.h10.ru/brute-md5.pl
есть одна просьба --- люди если есть какая нибудь интересная идея какой еще скрипт написать -- предлагайте не стесняйтесь-- знание перла есть а идеи уже иссякли-- так что жду предложений
идею?.....сделай прогу, что удаляет, например в папке ламо, файлы, которые не изменялись месяц, крч ты понял? просто считываешь дату создания и извенения и прибавляешь к дате создания месяц, крч понял? аа тока сначало чтобы выкидывал вопрос, типа да или нет, перед каждым файлом. все работай
угумс во первых это неитересно-- а во вторых пользуйся поиском с параметром создания фалов и удаляй скока влезет =)
извращение писать на перле окна. Для гуи есть другие средства(vb,c++,delphi,kylix). Вы бы еще на перле пеинт наколбасили.