Комментарии к записи: Опять многопоточность, но теперь в PERL (часть 2-я)

Автор: nopox

nopox — Wed, 13 May 2009 04:06:02 +0000

А что в подходе с shift нечеловечного?

Автор: Maniac Programmer

Maniac Programmer — Sat, 09 May 2009 07:45:08 +0000

my $arg = shift;
Це что за гон? Можно и более человечно записать:
my @args = @_;
my ($arg1, $arg2) = @_;

Автор: mult

mult — Sun, 07 Sep 2008 12:37:48 +0000

спасибо за статью. но обнулять список тредов из этого примера надо. если цикл большой и число потоков большое, то у меня ругался перл на то, что поток уже джоинед.

Автор: Zyzomys

Zyzomys — Tue, 24 Jun 2008 17:37:31 +0000

А зачем создавать @threads??? ведь можно использовать threads->list. Даже в документации есть пример.
foreach my $thr (threads->list)
{
# Don’t join the main thread or ourselves
if ($thr->tid && !threads::equal($thr, threads->self))
{
$thr->join;
}
}

Автор: nopox

nopox — Thu, 01 May 2008 19:10:48 +0000

Хорошо описано, только нужно ещё обнулять @threads, иначе будет ругаться что уже joined (если потоки будут в цикле создаваться).

Не совсем понял Вашу мысль, если честно. В моих примерах потоки создаются в циклах

допустим, что каждый поток качает и обрабатывает скачанное. Основная программа потоки создаёт только “пачками”. То есть если 1 поток наткнётся на медленный сайт – весь скрипт остановится пока не отработает поток. Как бы этого избежать….

Почему? Если не приджойниваться к ветке, то «начальник» не будет дожидаться окончания работы подчинённых. Вы сможете создавать форки ровно до тех пор, пока Вам это будет позволять объём свободной памяти. Поэтому не забывайте прибивать данные в использованных тредах…

Автор: zerror

zerror — Fri, 25 Apr 2008 23:14:24 +0000

Хорошо описано, только нужно ещё обнулять @threads, иначе будет ругаться что уже joined (если потоки будут в цикле создаваться).
Вопрос вот в другом, допустим, что каждый поток качает и обрабатывает скачанное. Основная программа потоки создаёт только «пачками». То есть если 1 поток наткнётся на медленный сайт – весь скрипт остановится пока не отработает поток. Как бы этого избежать….

Автор: nopox

nopox — Fri, 29 Feb 2008 08:44:20 +0000

Почему?

При создании ветки в режиме «создал и забыл» время работы треда не имеет значение

Автор: LD-73

LD-73 — Thu, 28 Feb 2008 12:25:35 +0000

Доброго!
Все замечательно, но есть но…
sub get_now
{
my $num = shift;
print «thread «, $num, » => «, time(), «\n»;
while(1)
{
#бесконечный цикл
}
}

Как быть в такой ситуации???
Ведь пока первая задача не закончиться второя так и будт висеть

Автор: iclothes

iclothes — Sun, 27 Jan 2008 13:27:53 +0000

Сабж.
Есть ли проверенные регистраторы по каталогам, за умеренную плату?. А как там ауторег.ру, жив еще?
Вот тут друг вроде регистрирует у чела, но хз… как-то лениво туда обращаться =) – http://www.top-seo.ru

Автор: __yura

__yura — Thu, 20 Dec 2007 09:34:38 +0000

Оч полезная статья, отличное введение в программирование потоков на перл, многим я думаю пригодится. Пиши ещё.