| line |
true |
false |
branch |
|
100
|
45 |
0 |
if (my $enc = $self->{'cf_output_encoding'}) |
|
104
|
0 |
45 |
unless (defined $file) |
|
120
|
0 |
4 |
$YATT::Lite::SYS ? : |
|
137
|
27 |
6 |
if $ext eq $self->{'cf_ext_public'} |
|
138
|
0 |
33 |
unless my $sub = $self->can("_handle_$ext") |
|
171
|
0 |
0 |
if (not $self->{'cf_dont_debug_param'} and -e '.htdebug_param') |
|
178
|
0 |
0 |
unless ($part->public) |
|
184
|
0 |
0 |
unless $self->{'cf_dont_map_args'} or $part->isa($trans->Action) |
|
194
|
3 |
3 |
unless my($sigil, $word) = $name =~ /^([~!])(\1|\w*)$/ |
|
197
|
3 |
0 |
$word eq $sigil ? : |
|
202
|
0 |
1 |
if (defined $subpage) |
|
209
|
0 |
2 |
if (defined $action) |
|
220
|
0 |
27 |
if (defined $subpage and defined $action) { } |
|
|
1 |
26 |
elsif (defined $subpage) { } |
|
|
2 |
24 |
elsif (defined $action) { } |
|
235
|
0 |
45 |
unless defined $fn |
|
236
|
0 |
45 |
unless $fn =~ s/\.(\w+$)// |
|
250
|
0 |
0 |
unless $self->{'cf_output_encoding'} |
|
254
|
0 |
0 |
if grep {$_ eq $enc;} &PerlIO::get_layers($fh) |
|
275
|
36 |
379 |
unless $self->{'YATT'} |
|
283
|
36 |
0 |
unless $vfsspec |
|
284
|
0 |
36 |
if $self->{'cf_base'} |
|
328
|
110 |
129 |
if (*{$sym;}{'CODE'}) |
|
337
|
21 |
108 |
unless ('YATT::Lite::MFields'->has_fields($app_ns)) |
|
342
|
129 |
0 |
unless (grep {$_->can('EntNS');} @baseclass) |
|
354
|
129 |
0 |
if (not my $code = *{$sym;}{'CODE'}) { } |
|
|
0 |
0 |
elsif ((my $old = &$code()) ne $entns) { } |
|
367
|
15 |
44 |
defined symtab($_)->{'EntNS'} ? : |
|
379
|
76 |
3 |
$is_objclass ? : |
|
385
|
78 |
1 |
unless (*{$ent;}{'CODE'}) |
|
390
|
0 |
174 |
if $ENV{'DEBUG_ENTNS'} |
|
395
|
76 |
3 |
if ($is_objclass) |
|
398
|
16 |
60 |
unless ($callpack->can('entity')) |
|
412
|
67 |
12 |
if UNIVERSAL::isa($class, 'YATT::Lite::Object') |
|
413
|
3 |
9 |
unless my $sym = look_for_globref($class, 'FIELDS') |
|
446
|
0 |
0 |
unless ($msglist or $msgdict) |
|
456
|
0 |
0 |
unless $self->{'cf_default_lang'} |
|
500
|
0 |
0 |
if (not @_) { } |
|
|
0 |
0 |
elsif (@_ > 1) { } |
|
|
0 |
0 |
elsif (not defined $_[0]) { } |
|
|
0 |
0 |
elsif (ref $_[0]) { } |