Branch Coverage

blib/lib/namespace/sweep.pm
Criterion Covered Total %
branch 26 32 81.2


line true false branch
25 1 10 exists $args{-'cleanee'} ? :
28 6 5 if (exists $args{-'also'})
29 2 4 if (ref $args{-'also'} and reftype($args{-'also'}) eq reftype([])) { }
42 2 0 reftype $also eq reftype(qr//) ? :
2 2 reftype $also eq reftype(sub { } ) ? :
3 4 !ref($also) ? :
0 7 !$also ? :
48 9 55 if first sub { &$_($_[0]); } , @also_tests
62 1 83 defined $def ? :
72 0 11 if ($class_of_cm or $class_of_mu)
79 0 0 if (blessed $meta and $meta->can('get_all_method_names'))
85 9 55 if &$run_test($sym)
87 27 37 unless exists &{$st . $sym;}
88 0 37 if $keep{$sym}
91 24 13 if $pkg eq $cleanee
92 1 12 if $pkg eq 'overload' and $name eq 'nil'