AnyEvent-Beanstalk-Worker

 view release on metacpan or  search on metacpan

eg/web-state.pl  view on Meta::CPAN

#!/usr/bin/env perl
use strict;
use warnings;
use feature 'say';

use lib 'eg';
use WebWorker;

my $w = WebWorker->new
  ( concurrency     => 1,  ## crank this up to 10000 for some real action
    max_stop_tries  => 1,
    initial_state   => 'fetch',
    beanstalk_watch => "urls" );

$w->beanstalk->use("urls")->recv;



( run in 0.268 second using v1.01-cache-2.11-cpan-87723dcf8b7 )