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'ом.. |
|
|