Branch Coverage
blib/lib/mop/object.pm
Criterion
Covered
Total
%
branch
7
8
87.5
line
true
false
branch
41
16
8
unless $self->does($role)
47
687
0
if (my $m = mop::meta($class))
48
10
677
if $m->has_method('DEMOLISH')
66
1
1456
@_ == 1 && ref $_[0] eq 'HASH' ? :