ANTICHAT — форум по информационной безопасности, OSINT и технологиям
ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию.
Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club,
и теперь снова доступен на новом адресе —
forum.antichat.xyz.
Форум восстановлен и продолжает развитие: доступны архивные темы, добавляются новые обсуждения и материалы.
⚠️ Старые аккаунты восстановить невозможно — необходимо зарегистрироваться заново.
 |
|

18.10.2007, 19:42
|
|
Banned
Регистрация: 22.08.2006
Сообщений: 608
Провел на форуме: 6144796
Репутация:
1095
|
|
>> Предположим у меня есть массив полученный из файла. Предположим есть 10 потоков. Как разбить этот массив на 10 частей и что бы каждый поток работал со своей частью?
можно что-нить типа этого замутить:
Код:
#!/usr/bin/perl -w
use strict;
my @a = 1..100; ## к примеру, поместим в массив числа от 1 до 100
push @a, undef; ## % )
my $num = 10; ## это - количество потоков
for (0..$num-1) {
print @a[$_*($#a/$num)..($_+1)*($#a/$num)-1], "\n";}
кста, иногда, лучше и не делить массив на равные части а работать с ним из каждого потока, например, извлекая из него элементы shift'ом..
|
|
|

18.10.2007, 20:59
|
|
Banned
Регистрация: 12.01.2007
Сообщений: 113
Провел на форуме: 4094601
Репутация:
495
|
|
Сообщение от Digimortal
красивей чтоли явно в скрипте значение прописать?
явно не о том думал виноват, исправлюсь
Про присваивания думаю удобней пользоваться
Код:
Getopt::Std || $ARGV || shift
|
|
|

19.10.2007, 13:10
|
|
Постоянный
Регистрация: 05.06.2007
Сообщений: 335
Провел на форуме: 4319431
Репутация:
677
|
|
Сообщение от Spyder
Предположим у меня есть массив полученный из файла. Предположим есть 10 потоков. Как разбить этот массив на 10 частей и что бы каждый поток работал со своей частью?
на самом деле разбивать ничего не нужно, так же не следует читать весь файл в массив ибо размер его в оперативной памяти будет слишком большим, я когда пишу всякие бруты, наполняю массив паролями, затем потоки дергают из него пароли, когда массив опустеет, он снова заполняется паролями и потоки снова запускаются
пример-
#!/usr/bin/perl
use threads;
use threads::shared;
my @pass : shared; #расшариваем массив
$thr = 10;
open (pass, "<$dic");
Next:
@pass = pass(); #вызываем функцию наполнения массива пасами
#создаем потоки
for(0..$thr)
{
$trl[$_] = threads->create(\&Brut);
}
for(0..$thr)
{
$trl[$_]->join; #ждем пока они завершатся
}
sub Brut
{
while (@pass)
{
$pass = shift @pass;
# тут собственно сам брут #
}
}
goto Next;
#функция заполнения массива пасвордами фром the файлек
sub pass
{
my (@mas);
while (<pass>){
push @mas, $_;
last if (@mas > 300);
}
chomp @mas;
return @mas;
}
Последний раз редактировалось C!klodoL; 19.10.2007 в 23:38..
|
|
|

25.10.2007, 09:36
|
|
Новичок
Регистрация: 02.09.2007
Сообщений: 4
Провел на форуме: 8694
Репутация:
-2
|
|
 Господи куда все катется? народ вы что? новички елы палы...на вопросы от которых вы хотите получить ответ есть все в учебнике!!! Есть документация по перлу в ней все понятно описано! ТОка не спрашивайте меня как открыть документацию это убьет мой мозг! Тут был посто о библиотеки TK, в документации все показано как работать с кодировкой и с библиотекой в целом. Честно я не хочу не кого обидеть, но писать какие то программы которые складывают числа да еще на перл..это вообще жесть! Люди учити библиотеку LWP для работы непосредствено с WWW. Выучите что такое легурярные вырожения! Если кому надо я могу скинуть ссылку на форум программеров там на все даже детские вопросы есть ответ! Кароче народ это жесть, перл изучается за 48 часов...не считая библиотек! Эх..да что я говорю!
|
|
|

25.10.2007, 16:58
|
|
Members of Antichat - Level 5
Регистрация: 09.10.2006
Сообщений: 1,698
Провел на форуме: 9098076
Репутация:
4303
|
|
ну и нах ты это написал? Перл гуру что ле, пиздец
|
|
|

25.10.2007, 17:01
|
|
Постоянный
Регистрация: 06.06.2006
Сообщений: 515
Провел на форуме: 1985206
Репутация:
963
|
|
гы
|
|
|

25.10.2007, 20:01
|
|
Постоянный
Регистрация: 09.07.2006
Сообщений: 937
Провел на форуме: 1948091
Репутация:
1686
|
|
гы2
|
|
|

26.10.2007, 22:07
|
|
Новичок
Регистрация: 02.09.2007
Сообщений: 4
Провел на форуме: 8694
Репутация:
-2
|
|
 Вот это мне нравится такие ответы "Перл Гуру ты.." "Гы" "Гы2"  просто нечего интересного и нормально для новичка я не увидел! Нах такую тему создовать если не кто не может дать нормальный свой ответ...только берут коды из статей и все такое! Елы палы если ТЫ да ТЫ юзер решил отпостить что нить для новичка то пиши полностью пример! Если спросил юзер как сделать кодирувку приведи ему полный пример а не то что написано на многих сайтах кароче эта темя на это форуме вообще не нужна и новичкам скажу бросайте этот раздел! вот вам нормальный форум тут вы на все получите полный ответ и даже если что вам приведут пример и прокамментируют код если не то другие! http://forum.vingrad.ru Так бросайте это раздел тут вы скажу вам на 100 процентов нечего не узнаите!
|
|
|

26.10.2007, 22:28
|
|
Постоянный
Регистрация: 05.06.2007
Сообщений: 335
Провел на форуме: 4319431
Репутация:
677
|
|
Outlaw не нравится, не заходи и нечего тут флудить, такое впечатление что ты прочитал - освой перл самостоятельно за 24 часа, и радуешь что научился хеллоу ворлду, я посмотрю как ты на винграде задашь вопрос как написать какой нибудь брутер или типа того
|
|
|

26.10.2007, 22:51
|
|
Новичок
Регистрация: 02.09.2007
Сообщений: 4
Провел на форуме: 8694
Репутация:
-2
|
|
хм...ода я изучил hello world и радуюсь! Ты думай что говоришь, может перл за 24 часа это твоя любимая книжка! На винграде можно задать любой вопрос...там были посты и посильней того что ты написал! Повторяю еще раз там можно получить на любой вопрос, ответ!!! Для тех кто не знает просьба не говорить! И где ты тут флуд увидел, тут как я понял раздел для новичков так вот я им и предлогаю хороший вариант по изучению перла и если есть вопросы где их лучше обсудить!
Последний раз редактировалось Outlaw; 26.10.2007 в 23:09..
|
|
|
|
 |
|
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|