как реализовать многопоточность

[sergeport]

пиплы, хелп плз! подскажите как реализовать многопоточность (threads). провожу поиск ссылок по сайтам - слишком долго в одном потоке.  :confused:
сенкс заранее!

[Макс]

у перл есть модули thread и threads

[sergeport]

а можно какой-нить простенький пример, плз? я на перле неделю  только сижу :-) еще зеленый. нужно чтоб одна функция выполнялась в разных потоках с разными вх. пар-рами.

[NeoNox]

http://search.cpan.org/author/JHI/perl-5.8.0/ext/threads/threads.pm

[Макс]

perldoc threads

Код: [Выделить]


use threads;
use Thread;

my $thread1 = new Thread (\\&hello, \'I am thread 1\', 6);
my $thread2 = new Thread (\\&hello, \'I am thread 2\', 6);
foreach($thread1, $thread2) {
   $_->join;
}

sub hello {
   my ($message, $loop) = @_;
   for (1..$loop) { print $message, "\\n"; sleep 1;}
}
что-то вроде этого (я в перл тоже пока зеленый).