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')) { } |