Branch Coverage

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


line true false branch
61 1317 6160 unless (@$self)
68 1090 5070 if ($priority >= $$self[-1][0])
75 764 4306 if ($priority < $$self[0][0])
83 103 4203 if (@$self == 2)
103 5 5485 unless @$self
136 6189 48749 if ($upper < $lower)
144 22476 26273 if ($priority < $$self[$midpoint][0])
172 3764 36344 if $upper < $lower
176 18986 17358 if ($priority < $$self[$midpoint][0])
190 3764 217 if $$self[$lower][1] == $id
204 2 232 unless (defined $priority)
213 1 231 unless (&$filter($$self[$item_index][2]))
233 4550 228 unless $count
238 1629 799403 if (&$filter($$self[$i][2]))
242 317 1312 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 24 2008 if ($new_priority >= $$self[-1][0])
370 22 1986 if ($new_priority < $$self[0][0])
379 0 1986 if (@$self == 2)
389 1491 495 if ($delta > 0) { }
407 1220 0 unless $count
412 5864 265 if (&$filter($$self[$i][2]))
414 989 4875 unless --$count