Branch Coverage

blib/lib/Cache/Memcached/Queue.pm
Criterion Covered Total %
branch 0 90 0.0


line true false branch
81 0 0 unless $self->memcached('Cache::Memcached::Fast'->new({'servers', $self->servers}))
85 0 0 unless $name =~ /\_$/
101 0 0 unless defined $flag
103 0 0 if (not defined $id && $id) { }
107 0 0 unless $id =~ /\_$/
115 0 0 if $flag and not defined $real_first
116 0 0 if (defined $real_first) { }
120 0 0 unless defined $self->name
149 0 0 if (not defined $parameters) { }
154 0 0 if (ref $parameters eq '') { }
0 0 elsif (not defined $parameters->{'value'}) { }
165 0 0 if (ref $value)
172 0 0 if (not $self->_is_locked or $self->_unlock)
176 0 0 if ($self->max_enq > 0 and $self->size >= $self->max_enq) { }
180 0 0 if $self->last =~ /_(\d+)$/ // 1
183 0 0 if ($first_value)
194 0 0 if $self->_is_locked
210 0 0 if (not $self->_is_locked or $self->_unlock)
213 0 0 if (not $size) { }
217 0 0 if $self->first =~ /_(\d+)$/ // 1
219 0 0 if ($value =~ /^\^.*?Storable/i)
225 0 0 if ($self->last ne $self->first) { }
228 0 0 if $size > 0
239 0 0 if $self->_is_locked
255 0 0 if $self->first =~ /_(\d+)$/ // 1
256 0 0 if $self->last =~ /_(\d+)$/ // 1
286 0 0 unless (ref($parameters) =~ /ARRAY/)
290 0 0 if (not $k =~ /^name|first|last|size|max_enq|qid$/) { }
295 0 0 if (not $self->memcached->set($index, $self->{$k}, 0)) { }
313 0 0 if (not defined $action && $action or defined $action and not ref($action) =~ /CODE/) { }
0 0 elsif (defined $action_params and not ref($action_params) =~ /ARRAY/) { }
0 0 elsif ($self->size == 0) { }
325 0 0 if $self->first =~ /(\d+)$/
326 0 0 if $self->last =~ /(\d+)$/
331 0 0 unless $mc_index =~ /_$/
334 0 0 unless (defined $value)
352 0 0 unless defined $qid and $qid
355 0 0 if (not $lock_pid) { }
357 0 0 unless defined $rs
377 0 0 unless defined $qid and $qid
380 0 0 if ($lock_pid and $lock_pid == $pid) { }
0 0 elsif ($lock_pid and $lock_pid != $pid) { }
382 0 0 unless defined $rs
400 0 0 unless defined $lock_idx
404 0 0 unless (defined $lock_idx and $lock_idx)