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) |