Branch Coverage

blib/lib/Class/Class.pm
Criterion Covered Total %
branch 74 94 78.7


line true false branch
79 10 10 unless exists ${$last;}{$_}
105 0 8 unless $class
109 1 7 if $self->isa($class) or $self->__tried_polymorph($class)
124 0 7 unless $_[0] =~ /^Can't locate $file in \@INC/
137 2 5 if package_exists $class and $class->can('import')
141 5 2 unless package_exists $class
177 0 2 if defined $glob and defined *{$glob;}{'CODE'}
182 12 2 if exists $$self{$_}
208 14 19 if ($type eq '$') { }
1 18 elsif ($type eq '\\$') { }
1 17 elsif ($type eq '@') { }
1 16 elsif ($type eq '\\@') { }
9 7 elsif ($type eq '%') { }
1 6 elsif ($type eq '\\%') { }
1 5 elsif ($type eq '*') { }
1 4 elsif ($type eq '\\*') { }
1 3 elsif ($type eq '&') { }
1 2 elsif ($type eq '\\&') { }
1 1 elsif ($type =~ /^[^\\]/) { }
210 14 19 scalar @_ == 2 ? :
216 1 0 scalar @_ == 2 ? :
222 1 0 scalar @_ == 2 ? :
1 1 scalar @_ == 3 ? :
229 1 0 scalar @_ == 2 ? :
1 1 scalar @_ == 3 ? :
236 34 0 scalar @_ == 2 ? :
29 34 scalar @_ == 3 ? :
243 1 0 scalar @_ == 2 ? :
1 1 scalar @_ == 3 ? :
251 1 0 scalar @_ == 2 ? :
257 1 0 scalar @_ == 2 ? :
265 0 1 unless $_[0] =~ /^Prototype mismatch:/o
267 1 0 scalar @_ == 2 ? :
277 1 1 scalar @_ == 2 ? :
282 0 1 if defined $_[1] and not UNIVERSAL::isa($_[1], $type)
288 0 1 scalar @_ == 2 ? :
296 0 1 if defined $_[1] and not UNIVERSAL::isa($_[1], $type)
302 0 1 scalar @_ == 2 ? :
319 12 31 unless UNIVERSAL::isa($class, 'Class::Class')
322 10 21 if $Class::Class::BUILT_METHODS{$class}
326 0 33 if ($Class::Class::OVERRIDE_INHERITED) { }
329 0 0 if defined $glob and defined *{$glob;}{'CODE'}
333 0 33 if $self->can($key)
371 5 21 if $self->__inited($class)
377 4 20 unless UNIVERSAL::isa($_, 'Class::Class')
385 17 4 unless UNIVERSAL::isa(ref $self, $class)
388 13 8 if defined &{"${class}::initialize";}