Skip to content

Instantly share code, notes, and snippets.

/-

Created February 2, 2016 07:06
Show Gist options
  • Save anonymous/a77a4dea225531a88c93 to your computer and use it in GitHub Desktop.
Save anonymous/a77a4dea225531a88c93 to your computer and use it in GitHub Desktop.
my $delay = Mojo::IOLoop->delay(sub {
my ($delay, $mojo, $minion) = @_; # Figure this magic voodoo out...
say $mojo->req->url . " -> " . $mojo->res->code;
});
$delay->on(finish => sub {
say "All urls downloaded";
});
$ua->get( $_ => $delay->begin) for @urls;
$delay->wait;
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment