Branch Coverage

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


line true false branch
61 1316 6102 unless (@$self)
68 1119 4983 if ($priority >= $$self[-1][0])
75 736 4247 if ($priority < $$self[0][0])
83 78 4169 if (@$self == 2)
103 5 5414 unless @$self
136 6145 48685 if ($upper < $lower)
144 21893 26792 if ($priority < $$self[$midpoint][0])
172 3764 36355 if $upper < $lower
176 19234 17121 if ($priority < $$self[$midpoint][0])
190 3764 215 if $$self[$lower][1] == $id
204 2 232 unless (defined $priority)
213 1 231 unless (&$filter($$self[$item_index][2]))
233 4498 227 unless $count
238 1626 799421 if (&$filter($$self[$i][2]))
242 316 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 33 1999 if ($new_priority >= $$self[-1][0])
370 23 1976 if ($new_priority < $$self[0][0])
379 0 1976 if (@$self == 2)
389 1482 494 if ($delta > 0) { }
407 1162 0 unless $count
412 5814 265 if (&$filter($$self[$i][2]))
414 931 4883 unless --$count