Branch Coverage

blib/lib/Class/MOP/Package.pm
Criterion Covered Total %
branch 32 36 88.8


line true false branch
19 2465 0 if @args % 2
25 65 2400 if (my $meta = Class::MOP::get_metaclass_by_name($package_name)) { }
34 12 2388 if $options{'weaken'}
44 19 116 if @args % 2
49 2 132 unless defined $package_name and $package_name and !&blessed($package_name) || $package_name->isa('Class::MOP::Package')
55 113 19 if &blessed($package_name)
70 1500 12 unless exists $INC{$filename}
104 2834 4 unless exists $options{'weaken'}
107 2720 118 if ($cache_ok)
109 0 2717 unless defined $cache_key
112 2717 118 if ($cache_ok)
113 2156 561 if (defined $ANON_PACKAGE_CACHE{$cache_key})
122 561 114 if ($cache_ok)
142 0 315 if &in_global_destruction()
144 104 211 if $self->is_anon
167 7 97 if defined $current_meta and $current_meta ne $self
188 1 1073 if $class ne "Class::MOP::Package"
191 1073 0 @_ == 1 ? :