Branch Coverage

blib/lib/Class/Unload.pm
Criterion Covered Total %
branch 17 32 53.1


line true false branch
16 0 2 unless 'Class::Inspector'->loaded($class)
2 8 unless 'Class::Inspector'->loaded($class)
18 0 2 if ($class =~ /\A(main|CORE|Internals|utf8|UNIVERSAL|PerlIO|re)\z/)
0 8 if ($class =~ /\A(main|CORE|Internals|utf8|UNIVERSAL|PerlIO|re)\z/)
26 2 0 if (defined $Hash::Util::VERSION) { }
0 0 elsif (&Internals::SvREADONLY(\%{$symtab;})) { }
8 0 if (defined $Hash::Util::VERSION) { }
0 0 elsif (&Internals::SvREADONLY(\%{$symtab;})) { }
27 0 2 if (&Hash::Util::hash_locked(\%{$symtab;}))
3 5 if (&Hash::Util::hash_locked(\%{$symtab;}))
38 0 2 if (&Internals::SvREADONLY(\@{"${class}::ISA";}))
0 8 if (&Internals::SvREADONLY(\@{"${class}::ISA";}))
45 0 9 if $symbol =~ /\A[^:]+::\z/
4 23 if $symbol =~ /\A[^:]+::\z/
61 0 2 if ('Class::Inspector'->loaded('Class::MOP'))
0 8 if ('Class::Inspector'->loaded('Class::MOP'))