VPF::Как одновременно читать и пайп и сокет?

loginn

Дата 31.8.2011, 17:09 (ссылка)

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

Загрузка ...

Новичок

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

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

в рамках одного процесса (без порождения потоков) нужно читать и пайп и сокет...
я использовал такую конструкцию, компилятор не ругнулся, но она работает только для того, что перед оператором OR:

Код


...
socketpair(CHILD, PARENT, 1, 1, 0) or  die "socketpair: $!";
select((select(PARENT), $|=1)[0]);
select((select(CHILD), $|=1)[0]);
...

if ($pid=fork()) {
  ...
}
else {
  open $pipe, "-|", "/usr/bin/tail", "-f", "/ramdisk/logs/$site/access.log";
  ...
  while ((defined ($command=<PARENT>)) or (defined ($msg=<$pipe>))) {
  ...
}
  ...
}

Так вот, если перед OR стоит $command=<PARENT> - то читается только PARENT, если перед OR стоит $msg=<$pipe>, то читатется только $pipe

Есть ли возможность в перле сделать подобное БЕЗ расщепления на 2 потока, где в каждом потоке свой цикл while, читадщий из нужного дескриптора?

sir_nuf_nuf

Дата 1.9.2011, 09:39 (ссылка)

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

Загрузка ...

Опытный

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

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

Вам нужно мультепликсирование ввода вывода.

perldoc IO::Select

--------------------

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