VPF::pop из потока - Форум программистов

Валерия

Дата 4.2.2009, 20:45 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 598
Регистрация: 10.3.2007

Репутация: нет
Всего: 8

Код


open(file, "file.txt");
@list=<file>;
close file;


for my $i (1..10) {
    push @threads, threads->create(\&get_now, $i);
}


foreach my $thread (@threads) {
    $thread->join();
}

sub get_now {
    print pop @list;
    print "\n";
}

Вот такой код должен вывести каждую строку из файла file.txt
Но выводит только последнюю 10 раз.
Если это дело не запихывать в потоки - то нормально работает.
Я так поняла что pop не может изменить глобальный массив, а лишь может прочитать?
Функция ведь прочитывает последний елемент и удаляет его...

FooBar

Дата 4.2.2009, 21:09 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 58
Регистрация: 25.2.2008

Репутация: 2
Всего: 3

в поток попадает копия массива, чтобы сделать его общим нужно использовать threads::shared http://perldoc.perl.org/threads/shared.html

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Perl: Системное программирование \| Следующая тема »