Branch Coverage

blib/lib/Forks/Queue.pm
Criterion Covered Total %
branch 39 62 62.9


line true false branch
28 170 1 if ($opts{'impl'})
30 0 170 if ($pkg =~ /[^\w:]/)
33 170 0 if (eval "require Forks::Queue::$pkg; 1") { }
0 0 elsif (eval "require $pkg; 1") { }
51 0 0 if ($args[$i] eq $key)
69 84 77 if @_
70 133 28 if ($self->{'style'} eq 'fifo') { }
71 70 63 @_ ? :
73 14 14 @_ ? :
74 14 14 @_ ? :
87 18 0 @_ ? :
97 6 6 @_ ? :
107 0 0 @_ ? :
117 0 0 @_ ? :
122 38981 33 if $self->{'_expire'}
127 15 3 if @_
128 0 3 if ($self->{'style'} eq 'fifo') { }
129 0 0 @_ ? :
131 0 3 @_ ? :
138 75 11 if @_ > 1
139 8 69 if ($self->{'style'} eq 'lifo') { }
149 0 135 $s->{'end'} ? :
132 135 $s->{'avail'} ? :
159 0 0 if (@_)
161 0 0 if (@_)
170 36 319 if not defined $value && &looks_like_number($value) or not $float_ok and $value != int $value or defined $ge and $value < $ge
196 0 198 if ($^O ne 'linux')
200 48 150 if ($pid == 0)
214 86 50 if ($Forks::Queue::Util::PID != $$)
225 121 0 if (defined ${^GLOBAL_PHASE}) { }
226 0 13202 if %{^GLOBAL_PHASE} eq 'DESTRUCT'