Branch Coverage

blib/lib/Thread/Queue.pm
Criterion Covered Total %
branch 22 64 34.3


line true false branch
30 0 2 if ($self->{'ENDED'})
40 2 0 if push @$queue, map({shared_clone($_);} @_)
57 0 6 if $self->{'ENDED'} and not @{$self->{'queue'};}
79 5 7 @_ ? :
83 7 0 if @$queue >= $count or $self->{'ENDED'}
86 0 7 if $self->{'ENDED'}
89 7 0 if $count == 1
104 5 1 @_ ? :
107 1 0 if $count == 1
112 0 0 unless @$queue
126 0 0 @_ ? :
128 0 0 if ($timeout < 32000000)
132 0 0 @_ ? :
136 0 0 unless &cond_timedwait(\%$self, $timeout)
138 0 0 if @$queue >= $count or $self->{'ENDED'}
149 4 0 @_ ? :
159 0 4 if ($self->{'ENDED'})
168 0 0 unless @_
171 0 0 if ($index < 0)
173 0 0 if ($index < 0)
201 8 0 @_ ? :
202 5 0 @_ ? :
205 0 0 if ($index < 0)
207 0 0 if ($index < 0)
209 0 0 if $count <= 0
228 0 0 if $count == 1
242 10 6 if (not defined $index && &looks_like_number($index) or int $index != $index)
250 4 6 unless defined $index
263 9 0 if (not defined $count && &looks_like_number($count) or int $count != $count or $count < 1)
272 3 12 unless defined $count
285 0 0 unless (defined $timeout and &looks_like_number($timeout))
292 0 0 unless defined $timeout