
11.06.2008, 18:28
|
|
Leaders of Antichat - Level 4
Регистрация: 16.01.2006
Сообщений: 1,966
С нами:
10692266
Репутация:
3486
|
|
Попытка создания многопоточного скрипта:
Код:
#!/usr/bin/perl
use threads;
for(0..10) { $trl[$_]=threads->create(\&trp,$_);}
for(@trl) { $_->join;}
sub trp
{
my $i=1, my $x=5;
while($i<=$x)
{
print $i.":test\n";
$i++;
}
}
По идее должны записи выводится хаотично.
Но выводятся они так:
1:test
2:test
3:test
4:test
5:test
1:test
2:test
3:test
....etc....
Потоки то есть, но почему то последовательно а не параллельно.
|
|
|