| line |
true |
false |
branch |
|
27
|
0 |
0 |
unless my $conf = do $conf_file |
|
30
|
0 |
0 |
unless defined $$conf{'zcms_template_extension'} |
|
33
|
0 |
0 |
unless ($no_page_check) |
|
40
|
0 |
0 |
unless ($is_valid_page) |
|
54
|
0 |
0 |
unless (ref $valid_pages eq 'HASH') |
|
58
|
0 |
0 |
unless $$valid_pages{'pages'} |
|
59
|
0 |
0 |
if $_ eq $$query{'dir'} . $$query{'page'} |
|
63
|
0 |
0 |
unless $$valid_pages{'dirs'} |
|
64
|
0 |
0 |
if $_ eq $$query{'dir'} and -e 'File::Spec'->catfile($templates_dir, $$query{'dir'}, $$query{'page'} . $ext) |
|
77
|
1 |
0 |
unless (defined $query{'page'} and length $query{'page'}) |
|
81
|
0 |
1 |
if ($query{'page'} =~ m[/]) |
|
85
|
0 |
1 |
unless (defined $query{'page'} and length $query{'page'}) |
|
89
|
1 |
0 |
unless (defined $query{'dir'} and length $query{'dir'}) |
|
95
|
0 |
1 |
unless substr($query{'dir'}, 0, 1) eq '/' |
|
98
|
0 |
1 |
unless substr($query{'dir'}, -1) eq '/' |
|
106
|
1 |
0 |
if (@_) |
|
115
|
1 |
0 |
if (@_) |
|
124
|
1 |
1 |
if (@_) |