blib/lib/Thread/Queue.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 18 | 36 | 50.0 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
37 | 2 | 0 | 0 | $self->{'LIMIT'} and @$queue >= $self->{'LIMIT'} |
57 | 6 | 0 | 0 | $self->{'ENDED'} and not @{$self->{'queue'};} |
82 | 7 | 0 | 0 | @$queue < $count and not $self->{'ENDED'} |
135 | 0 | 0 | 0 | @$queue < $count and not $self->{'ENDED'} |
242 | 4 | 3 | 9 | defined $index && &looks_like_number($index) |
263 | 3 | 3 | 9 | defined $count && &looks_like_number($count) |
285 | 0 | 0 | 0 | defined $timeout and &looks_like_number($timeout) |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
83 | 7 | 0 | 0 | @$queue >= $count or $self->{'ENDED'} |
138 | 0 | 0 | 0 | @$queue >= $count or $self->{'ENDED'} |
242 | 7 | 3 | 6 | not defined $index && &looks_like_number($index) or int $index != $index |
263 | 6 | 3 | 6 | not defined $count && &looks_like_number($count) or int $count != $count |
9 | 6 | 0 | not defined $count && &looks_like_number($count) or int $count != $count or $count < 1 |