Hi!
Please add error-checking code and see is it change anything.
Also, I recommend you do add something like "warn 1;", "warn 2;", etc.
between most lines to find out on which line perl crash.
On Tue, Dec 09, 2014 at 03:14:28PM -0800, Scott wrote:
> for my $email ( @emails ) {
> my $tx = $ua->get( $bv . $email );
warn($tx->error->{message}), next if $tx->error;
> my $res = $tx->res->json;
> say Dumper $res;
> }
>
> Mojo::IOLoop::Delay->new->steps(
> sub {
> my $delay = shift;
> $ua->get( $bv . $_ => $delay->begin ) for @emails;
> },
> sub {
> my $delay = shift;
> for my $tx ( @_ ) {
warn($tx->error->{message}), next if $tx->error;
> my $res = $tx->res->json;
> say Dumper $res;
> }
> }
> )->wait;
>
> I do have EV installed.
Cool, but then please add 'use EV;' at beginning of your script, just to
make sure it works.
--
WBR, Alex.
--
You received this message because you are subscribed to the Google Groups
"Mojolicious" group.
To unsubscribe from this group and stop receiving emails from it, send an email
to [email protected].
To post to this group, send email to [email protected].
Visit this group at http://groups.google.com/group/mojolicious.
For more options, visit https://groups.google.com/d/optout.
