Branch Coverage

blib/lib/MOP/Method.pm
Criterion Covered Total %
branch 13 16 81.2


line true false branch
25 2 1029 if (scalar @_ == 1) { }
26 2 0 if (ref $_[0])
27 1 1 if (ref $_[0] eq 'CODE') { }
1 0 elsif (ref $_[0] eq 'HASH') { }
40 1 1030 unless $args{'body'}
43 1 1029 unless ref $args{'body'} eq 'CODE'
97 0 25 if scalar @classnames == 0
102 18 7 if $candidate eq $class