| line |
!l |
l&&!r |
l&&r |
condition |
|
321
|
3 |
0 |
9 |
my $perl_ar = $meta{'perl'} and not $param_hr->{'noperl'} |
|
346
|
10 |
0 |
0 |
@filter and not $param_hr->{'nofilter'} |
|
623
|
176 |
0 |
0 |
$static_fg and $subst_fg |
|
648
|
16 |
29 |
60 |
$data_ar->[$WebDyne::Compile::WEBDYNE_NODE_CHLD_IX] && grep({ref $_;} @{$$data_ar[$WebDyne::Compile::WEBDYNE_NODE_CHLD_IX];}) |
|
828
|
69 |
11 |
53 |
not $WebDyne::Compile::CGI_TAG_WEBDYNE{$html_tag} || $WebDyne::Compile::CGI_TAG_IMPLICIT{$html_tag} and $data_uppr_ar |
|
|
80 |
2 |
51 |
not $WebDyne::Compile::CGI_TAG_WEBDYNE{$html_tag} || $WebDyne::Compile::CGI_TAG_IMPLICIT{$html_tag} and $data_uppr_ar and not $subst_fg |
|
|
29 |
0 |
53 |
$WebDyne::Compile::CGI_TAG_WEBDYNE{$html_tag} and $data_uppr_ar |
|
|
29 |
53 |
0 |
$WebDyne::Compile::CGI_TAG_WEBDYNE{$html_tag} and $data_uppr_ar and $static_fg |
|
924
|
51 |
307 |
269 |
@data_uppr and not ref $data_chld_ar |
|
|
358 |
190 |
79 |
@data_uppr and not ref $data_chld_ar and not ref $data_uppr[$#data_uppr] |
|
1012
|
11 |
50 |
60 |
$data_chld_ix and not ref $data[$data_chld_ix] |
|
|
61 |
39 |
21 |
$data_chld_ix and not ref $data[$data_chld_ix] and not ref $data[$data_chld_ix - 1] |
|
1115
|
82 |
0 |
9 |
$html_or->{'_code'} and $attr{'perl'} |
|
1171
|
65 |
0 |
39 |
$html_child_or =~ /^\s*$/ and $html_tag ne 'pre' |
|
|
65 |
0 |
39 |
$html_child_or =~ /^\s*$/ and $html_tag ne 'pre' and $html_tag ne 'textarea' |
|
|
0 |
0 |
39 |
$html_child_or =~ /^\s*$/ and $html_tag ne 'pre' and $html_tag ne 'textarea' and not $WebDyne::Compile::WEBDYNE_COMPILE_NO_SPACE_COMPACTING |
| line |
l |
!l |
condition |
|
164
|
14 |
0 |
$self->{'_r'} || $self->r || (return err()) |
|
169
|
14 |
0 |
$self->{'_CGI'} || $self->CGI || (return err()) |
|
185
|
14 |
0 |
'IO::File'->new($html_cn, 0) || (return err("unable to open file $html_cn, $!")) |
|
191
|
14 |
0 |
'WebDyne::HTML::TreeBuilder'->new('api_version', 3) || (return err('unable to create HTML::TreeBuilder object')) |
|
219
|
14 |
0 |
$html_ox->parse_fh($html_fh) || (return err()) |
|
266
|
14 |
0 |
$self->find_node({'data_ar', $data_ar, 'tag', 'head'}) || (return err()) |
|
273
|
14 |
0 |
$self->find_node({'data_ar', $head_ar->[0], 'tag', 'meta', 'all_fg', 1}) || (return err()) |
|
282
|
2 |
0 |
$tag_ar->[$WebDyne::Compile::WEBDYNE_NODE_ATTR_IX] || (next) |
|
291
|
0 |
0 |
$self->subst_attr(undef, {$name, $value}) || (return err()) |
|
355
|
0 |
0 |
$self->$filter($data_ar, \%meta) || (return err()) |
|
362
|
10 |
0 |
$self->optimise_one($data_ar) || (return err()) |
|
372
|
10 |
0 |
$self->optimise_two($data_ar) || (return err()) |
|
526
|
12 |
0 |
$self->{'_CGI'} || (return err('unable to get CGI object from self ref')) |
|
565
|
164 |
0 |
&$compile_cr($compile_cr, $data_chld_ar) || (return err()) |
|
633
|
0 |
0 |
$self->WebDyne::subst_attr(undef, $attr_hr) || (return err()) |
|
669
|
0 |
0 |
$self->$html_tag($data_ar, $attr_hr) || (return err()) |
|
681
|
45 |
0 |
eval {
do {
$cgi_or->$html_tag(grep({$_;} $attr_hr, join(undef, @data_child_ar)))
}
} || (return errsubst("CGI tag '<$html_tag>': %s", $@ || "undefined error rendering tag '${html_tag}'")) |
|
715
|
12 |
0 |
&$compile_cr($compile_cr, $data_ar) || (return err()) |
|
747
|
12 |
0 |
$self->{'_CGI'} || (return err('unable to get CGI object from self ref')) |
|
789
|
122 |
0 |
&$compile_cr($compile_cr, $data_chld_ar, $data_ar) || (return err()) |
|
953
|
0 |
0 |
$self->render({'data', [$data_ar]}) || (return err()) |
|
1154
|
199 |
0 |
$self->parse($html_child_or, $meta_hr) || (return err()) |
| line |
l |
!l&&r |
!l&&!r |
condition |
|
147
|
13 |
1 |
0 |
ref($self)->{'_compile_init'} ||= do {
return err() unless $self->compile_init
} |
|
250
|
14 |
0 |
0 |
$self->parse($html_ox, \%meta) || do {
$html_ox->delete;
undef $html_ox;
return err()
} |
|
342
|
0 |
0 |
10 |
$self->{'_filter'} || $r->dir_config('WebDyneFilter') |
|
601
|
0 |
18 |
158 |
$data_ar->[$WebDyne::Compile::WEBDYNE_NODE_SBST_IX] || delete $attr_hr->{'subst'} || grep({push @subst_oper, $1 if $_ =~ /([\$\@%!+*^]){1}{(\1?)(.*?)\2}/;} values %{$attr_hr;}) |
|
642
|
53 |
18 |
105 |
$WebDyne::Compile::CGI_TAG_WEBDYNE{$html_tag} || $subst_fg |
|
|
105 |
0 |
71 |
not $WebDyne::Compile::CGI_TAG_WEBDYNE{$html_tag} || $subst_fg or $static_fg |
|
816
|
0 |
0 |
115 |
$data_ar->[$WebDyne::Compile::WEBDYNE_NODE_SBST_IX] || delete $attr_hr->{'subst'} || grep({$_ =~ /([\$\@%!+*^]){1}{(\1?)(.*?)\2}/so;} values %{$attr_hr;}) |
|
828
|
53 |
16 |
64 |
$WebDyne::Compile::CGI_TAG_WEBDYNE{$html_tag} || $WebDyne::Compile::CGI_TAG_IMPLICIT{$html_tag} |
|
869
|
0 |
0 |
0 |
$@ || "undefined error rendering tag '${_}'" |
|
983
|
0 |
0 |
0 |
$@ || "undefined error rendering tag '${_}'" |
|
1043
|
11 |
0 |
0 |
&$compile_cr($compile_cr, $data_ar, undef) || err() |
|
1093
|
0 |
213 |
0 |
$CGI_Tag_Ucase{$html_tag} || $html_tag |
|
1098
|
143 |
70 |
0 |
UNIVERSAL::can('CGI', $html_tag) or $WebDyne::Compile::CGI_TAG_WEBDYNE{$html_tag} |