[Moscow.pm] AnyEvent condvar - reuse not possible?
Mons Anderson
mons на cpan.org
Ср Ноя 20 18:01:44 PST 2013
Простой и не очень правильный способ:
delete $cv->{_ae_sent};
https://metacpan.org/source/MLEHMANN/AnyEvent-7.05/lib/AnyEvent.pm#L1961
Но позвольте поинтересоваться, в какой задаче у вас возникает необходимость вызывать recv?
В нормальном приложении на anyevent recv может встречаться только 1 раз, и то, если вместо него не написан EV::loop (что более производительно).
AE::cv { ... } + begin/end - это да, в большом количестве. Но не recv/send
> my ($t1, $t2);
> $t1 = AE::timer 1, 0, sub {
> warn "1st timer fired";
> undef $t1;
> $t2= AE::timer (1, 0, sub {
> undef $t2;
> warn "2nd timer fired";
> $cv->send;
> });
> };
лучше так:
my $t; $t = AE::timer 1, 0, sub {
warn "1st";
$t = AE::timer 1, 0, sub { # unref old and keep new
undef $t;
warn "2nd";
$cv->send;
}
}
On 20.11.2013, at 20:13, Anton Yuzhaninov <citrin на citrin.ru> wrote:
> Хочется иметь condvar, которую можно использовать повторно, но похоже $cv->recv можно сделать только один раз.
>
> В таком коде:
>
> use AnyEvent;
>
> my $cv = AE::cv;
>
> $cv->begin;
>
> my $t1 = AE::timer 4, 0, sub { $cv->end };
>
> warn "wait for 1st timer";
>
> $cv->recv;
>
> warn "1st timer fired";
>
> $cv->begin;
>
> my $t2 = AE::timer 3, 0, sub { $cv->end };
>
> $cv->recv;
>
> Второй $cv->recv возвращается сразу без ожидания $cv->end в callback от второго таймера.
>
> Это баг или фича?
> --
> Moscow.pm mailing list
> moscow-pm на pm.org | http://moscow.pm.org
----------- следущая часть -----------
Вложение в формате HTML было извлечено…
URL: <http://mail.pm.org/pipermail/moscow-pm/attachments/20131121/eb67e81b/attachment.html>
Подробная информация о списке рассылки Moscow-pm