Branch Coverage

blib/lib/YATT/Lite/WebMVC0/DirApp.pm
Criterion Covered Total %
branch 31 66 46.9


line true false branch
32 0 45 unless chdir $self->{'cf_dir'}
39 4 0 if ref $err
42 45 0 if (my $charset = $self->header_charset)
61 0 27 if (defined $type and my $subpath = $prop->{'cf_subpath'})
62 0 0 if $type ne 'action'
67 9 18 if (not defined $type and $self->{'cf_use_subpath'} and my $subpath = $prop->{'cf_subpath'}) { }
69 0 9 unless (my $tmpl = $trans->find_file($file))
72 1 8 unless (($part, my($formal, $actual)) = $tmpl->match_subroutes($subpath))
77 0 8 unless ($pkg = $trans->find_product('perl', $tmpl))
81 0 8 unless ($sub = $pkg->can("render_$name"))
85 8 0 unless $self->{'cf_dont_map_args'}
91 16 2 unless $self->{'cf_dont_map_args'} or $part->isa($trans->Action)
94 0 26 unless ($part->public)
109 17 28 if ($prop->{'cf_is_index'})
112 12 5 if ($sub_fn ne '' and my $action = $self->get_action_handler($sub_fn, 1))
121 0 6 unless my $action = $self->get_action_handler($file)
145 1 2 if not defined $age and $can_be_missing
153 0 16 if (not defined $item) { }
12 4 elsif ($item->[1]) { }
0 4 elsif (not defined($age = -M $path)) { }
3 1 elsif ($item->[-1] == $age) { }
168 1 18 unless defined $item and $item->[0]
169 0 18 wantarray ? :
190 0 0 unless $self->{'cf_header_charset'} or $self->{'cf_output_encoding'} or $YATT::Lite::WebMVC0::DirApp::SYS->header_charset
198 0 0 unless ($self->{'locale_cache'}{$lang})
199 0 0 if (-r (my $fn = $self->fn_msgfile($lang)))
215 0 0 if (my $con = $self->CON) { }
0 0 elsif ($YATT::Lite::WebMVC0::DirApp::SYS) { }
223 0 0 if (my $code = $err->{'cf_http_status_code'}) { }
0 0 elsif ($code = $errcon->cget('status')) { }
230 0 0 unless (($sub, $pkg) = $self->find_renderer($type, 'ignore_error', 1))
231 0 0 if ($err->{'cf_http_status_code'} or $self->{'cf_overwrite_status_code_for_errors_as'}) { }
252 0 0 unless defined $name