Branch Coverage

blib/lib/POE/Queue/Array.pm
Criterion Covered Total %
branch 52 66 78.7


line true false branch
61 1322 6112 unless (@$self)
68 1125 4987 if ($priority >= $$self[-1][0])
75 712 4275 if ($priority < $$self[0][0])
83 89 4186 if (@$self == 2)
103 5 5427 unless @$self
136 6162 48655 if ($upper < $lower)
144 22078 26577 if ($priority < $$self[$midpoint][0])
172 3764 36343 if $upper < $lower
176 19286 17057 if ($priority < $$self[$midpoint][0])
190 3764 315 if $$self[$lower][1] == $id
204 2 232 unless (defined $priority)
213 1 231 unless (&$filter($$self[$item_index][2]))
233 4495 228 unless $count
238 1629 799526 if (&$filter($$self[$i][2]))
242 319 1310 unless --$count
257 0 2032 unless (defined $old_priority)
266 1000 1032 unless (&$filter($$self[$item_index][2]))
274 0 1032 unless $delta
292 0 2000 unless (defined $old_priority)
300 500 1500 if $new_priority == $old_priority
306 500 1000 unless (&$filter($$self[$item_index][2]))
326 0 0 if ($index > 0)
329 0 0 if $before > $at
332 0 0 if ($index < $#$self)
336 0 0 if $at >= $after
356 0 2032 unless (@$self)
363 35 1997 if ($new_priority >= $$self[-1][0])
370 21 1976 if ($new_priority < $$self[0][0])
379 0 1976 if (@$self == 2)
389 1480 496 if ($delta > 0) { }
407 1215 0 unless $count
412 5881 265 if (&$filter($$self[$i][2]))
414 986 4895 unless --$count