Branch Coverage

blib/lib/List/Util/PP.pm
Criterion Covered Total %
branch 83 108 76.8


line true false branch
41 0 25 if ($pkg eq "List::Util" and @_ < 2)
52 7 25 unless (length ref $f and eval { do { $f = \&$f; 1 } })
57 2 23 unless @_ > 1
76 0 5 unless (length ref $f and eval { do { $f = \&$f; 1 } })
81 1 4 unless @_
82 0 4 unless @_ > 1
104 5 18 unless (length ref $f and eval { do { $f = \&$f; 1 } })
116 1 21 unless @_
123 0 16 unless @_
131 2 19 unless @_
139 0 4 unless @_
147 0 4 unless @_
161 1 15 if $num > @_
162 5 11 defined $RAND ? :
169 0 4 unless (length ref $f and eval { do { $f = \&$f; 1 } })
181 0 5 unless (length ref $f and eval { do { $f = \&$f; 1 } })
193 0 4 unless (length ref $f and eval { do { $f = \&$f; 1 } })
205 0 4 unless (length ref $f and eval { do { $f = \&$f; 1 } })
228 1 2 if (@_ % 2)
243 0 1 if (@_ % 2)
253 0 1 if (@_ % 2)
265 0 11 unless (length ref $f and eval { do { $f = \&$f; 1 } })
270 1 10 if (@_ % 2)
290 0 7 unless (length ref $f and eval { do { $f = \&$f; 1 } })
295 2 5 if (@_ % 2)
307 4 7 wantarray ? :
11 7 &$f() ? :
315 0 5 unless (length ref $f and eval { do { $f = \&$f; 1 } })
320 0 5 if (@_ % 2)
331 1 2 wantarray ? :
3 10 if &$f()
344 108 3 defined $_ ? :
357 3 0 if (ref $nv and defined &overload::ov_method and defined &overload::mycan)
360 0 3 if (UNIVERSAL::isa($nv, 'Math::BigInt')) { }
3 0 elsif (my $method = overload::ov_method(overload::mycan($package, '(0+'), $package) || overload::ov_method(overload::mycan($package, '""'), $package) || overload::ov_method(overload::mycan($package, 'bool'), $package)) { }
0 0 elsif (my $nomethod = overload::ov_method(overload::mycan($package, '(nomethod'), $package)) { }
377 0 333453 if (defined $k) { }
0 333453 elsif (ref $nv) { }
29788 303665 elsif ($nv == 0) { }
215 303450 elsif ($nv != $nv or $nv == 9**9**9) { }
93167 210283 elsif (int $nv != $nv) { }
394 774 209509 if ($flags & 2147483648) { }
192796 16713 elsif ($flags & 256) { }
16713 0 elsif ($flags & 512) { }
410 333451 2 defined $_ ? :
423 4 0 $_ > 0 ? :
14 4 /\A[0-9]+\z/ ? :
429 1 11 ref $_ ? :
16 2 defined $_ ? :
439 31 2 defined $_ ? :
447 3 8 if $size > @_
448 4 4 $size >= 0 ? :
454 1 8 if $size > @_
455 4 4 $size >= 0 ? :