[Rio-pm] AnyEvent
Stanislaw Pusep
creaktive em gmail.com
Quarta Março 14 13:48:24 PDT 2012
Você está fazendo isso certo :)
Um exemplo ilustrativo tosco de como usar AnyEvent para o que vc quer
(observe a lógica; o protocolo aqui é HTTP em cima de TCP):
my $cv = AE::cv;
my $i = 0;
my $get;
$get = sub {
$cv->begin;
http_get $urls[$i++], sub {
$get->() if $i <= $#urls;
$cv->end;
};
};
for (1 .. $parallel) {
$get->();
}
$cv->wait;
Mais detalhes sobre AnyEvent:
http://sao-paulo.pm.org/equinocio/2011/set/13
ABS()
On Wed, Mar 14, 2012 at 17:29, Aureliano Guedes <guedes_1000 em hotmail.com>wrote:
> Boa tarde monges,
> estou tentando entender o modulo AnyEvent, mas programação orientada a
> eventos é russo pra minha cabeça ainda.
>
> Eu tenho uma rotina que se conecta a um IP qualquer usando protocolo UDP
> com IO::Socket::INET, e quero que essa rotina tente fazer 10 requisições
> por vez.
> Eu ja eliminei a ideia de usar threads, mas to com dificuldade de usar
> esse modulo.
>
> To totalmente perdido, pensei em usar AnyEvent::Util e List::Util, mas to
> começando a achar que não é apropriado, mas foi la que achei um exemplo
> mais ou menos...
>
> Se puderem colaborar com um exemplo bem simples para eu entender, eu
> agradeço...
>
> Att,
> Aureliano Guedes
>
> _______________________________________________
> Rio-pm mailing list
> Rio-pm em pm.org
> http://mail.pm.org/mailman/listinfo/rio-pm
>
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/rio-pm/attachments/20120314/a9547e17/attachment-0001.html>
Mais detalhes sobre a lista de discussão Rio-pm