| line |
true |
false |
branch |
|
47
|
0 |
1 |
unless my $vars = $self->find_vars($page ||= $self->page_name) or $failok |
|
52
|
1 |
2 |
if ($failok and ref $value and UNIVERSAL::can($value, 'varname') and UNIVERSAL::can($value, 'value')) { } |
|
56
|
0 |
1 |
ref $_ ? : |
|
60
|
2 |
0 |
if (not ref $value or ref $value eq 'ARRAY' or ref $value eq 'HASH') { } |
|
67
|
0 |
2 |
if ref $value eq 'CODE' |
|
73
|
2 |
0 |
ref $_[0] ? : |
|
75
|
0 |
2 |
unless my $page_vars = $$self{'pages'}{$page} |
|
77
|
2 |
0 |
if (not defined $varname) { } |
|
94
|
2 |
1 |
if (not ref $value) { } |
|
|
0 |
1 |
elsif (ref $value eq 'ARRAY') { } |
|
|
0 |
1 |
elsif (ref $value eq 'CODE') { } |
|
|
1 |
0 |
elsif (UNIVERSAL::can($value, 'varname') and UNIVERSAL::can($value, 'value')) { } |