blib/lib/Job/Async/Worker/Redis.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 0 | 26 | 0.0 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
166 | 0 | 0 | 0 | not $pending and $self->{'awaiting_job'} |
216 | 0 | 0 | 0 | not $pending and $self->{'stopping_future'} |
252 | 0 | 0 | 0 | $self->mode eq 'reliable' and @$queues > 1 |
line | l | !l | condition |
---|---|---|---|
125 | 0 | 0 | +(shift())->{'prefix'} //= 'jobs' |
135 | 0 | 0 | +(shift())->{'pending_queues'} ||= ['pending'] |
141 | 0 | 0 | +(shift())->{'processing_queue'} //= 'processing' |
240 | 0 | 0 | +(shift())->{'max_concurrent_jobs'} //= 1 |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
37 | 0 | 0 | 0 | $self->{'incoming_job'} //= do { die 'needs to be part of a loop' unless $self->loop; my $src = $self->ryu->source; $src->each($self->curry::weak::on_job_received); $src } |
164 | 0 | 0 | 0 | $self->{'stopping_future'} ||= $self->loop->new_future |
236 | 0 | 0 | 0 | $self->{'awaiting_job'} //= $self->queue_redis->brpoplpush($self->prefixed_queue($queue), $self->prefixed_queue($self->processing_queue), 0)->on_ready(sub { my $f = shift(); delete $self->{'awaiting_job'}; local(@{$$Job::Async::Worker::Redis::log{'context'};}{'worker_id', 'queue'}) = ($self->id, $queue); $Job::Async::Worker::Redis::log->tracef('Had task from queue, pending now %d', 0 + keys(%{$$self{'pending_jobs'};})); Deparse error: Can't call method "name" on an undefined value at /usr/local/lib/perl5/5.26.1/B/Deparse.pm line 5851. ; $self->loop->later($self->curry::weak::trigger); } ) |