++ed by:

32 PAUSE users
33 non-PAUSE users.

Marc A. Lehmann


Coro::Signal - coroutine signals (binary semaphores)


 use Coro::Signal;

 $sig = new Coro::Signal;

 $sig->wait; # wait for signal

 # ... some other "thread"



This module implements signal/binary semaphores/condition variables (basically all the same thing). You can wait for a signal to occur or send it, in which case it will wake up one waiter, or it can be broadcast, waking up all waiters.

$s = new Coro::Signal;

Create a new signal.


Wait for the signal to occur. Returns immediately if the signal has been sent before.

Signals are not reliable: this function might return spuriously without the signal being sent. This means you must always test for the condition you are waiting for.

(If this is a real problem for you the situation might be remedied in a future version).

$status = $s->timed_wait ($timeout)

Like wait, but returns false if no signal happens within $timeout seconds, otherwise true.

See wait for some reliability concerns.


Send the signal, waking up one waiting process or remember the signal if no process is waiting.


Send the signal, waking up all waiting process. If no process is waiting the signal is lost.


Return true when the signal is being awaited by some process.


This implementation is not currently very robust when the process is woken up by other sources, i.e. wait might return early.


 Marc Lehmann <schmorp@schmorp.de>