Branch Coverage

blib/lib/WebDyne/Chain.pm
Criterion Covered Total %
branch 0 44 0.0


line true false branch
106 0 0 if $WebDyne::Chain::WEBDYNE_WARNINGS_FATAL
123 0 0 if (my $module_ar = $$param_hr{'meta'}{'webdynechain'}) { }
0 0 elsif (my $module = $r->dir_config('WebDyneChain')) { }
138 0 0 unless $module[0] eq 'WebDyne::Chain'
139 0 0 unless $module[$#module] eq 'WebDyne'
150 0 0 if (@module == 2)
161 0 0 unless ($Package{'_chain_loaded_hr'}{$location}++)
165 0 0 unless eval "require $package"
174 0 0 if ((my $location_current = $Package{'_location_current'}) ne $location) { }
190 0 0 if (my $chain_hr = $Package{'_chain_hr'}{$location})
295 0 0 if (my $cr = UNIVERSAL::can($package_chain, 'DESTROY'))
323 0 0 if $autoload =~ /::DESTROY$/
336 0 0 if ref $self
0 0 unless (eval { do { $r = $$self{'_r'} if ref $self } })
369 0 0 if ($autoload =~ /\QSUPER::$method_autoload\E$/)
372 0 0 if (UNIVERSAL::can($$chain_ar[$i], $method_caller) eq $subroutine_caller_cr) { }
392 0 0 if (my $cr = UNIVERSAL::can($$chain_ar[$i], $method_autoload)) { }
397 0 0 if ($cr eq $subroutine_caller_cr)
441 0 0 if $chain{$caller}++
443 0 0 if (my $cr = UNIVERSAL::can($caller, $method_autoload))
444 0 0 if ($cr eq $subroutine_caller_cr)
449 0 0 if ($WebDyne::Chain::WEBDYNE_AUTOLOAD_POLLUTE)