[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