line |
true |
false |
branch |
46
|
0 |
0 |
if (@_ % 2) |
62
|
0 |
0 |
if ($options{'file_cache'} or $options{'shared_cache'}) |
69
|
0 |
0 |
if (exists $options{'filter'}) |
71
|
0 |
0 |
if ref $options{'filter'} eq 'CODE' |
76
|
0 |
0 |
if ref $options{'filter'} eq 'HASH' |
79
|
0 |
0 |
unless (ref $options{'filter'} eq 'ARRAY') |
94
|
0 |
0 |
unless (exists $options{'global_vars'}) |
106
|
0 |
0 |
if ($@) |
111
|
0 |
0 |
unless (exists $set_params{'___loaded_set_params'}) |
113
|
0 |
0 |
if ($$self{'options'}{'cache'}) |
117
|
0 |
0 |
if (defined $set_params and ref $set_params eq 'HASH') |
119
|
0 |
0 |
if ($$self{'options'}{'debug'}) |
136
|
0 |
0 |
unless defined $defaults and ref $defaults eq 'HASH' or defined $args and ref $args eq 'HASH' |
155
|
0 |
0 |
unless $$text |
184
|
0 |
0 |
unless defined $chunks[$chunk_number] |
188
|
0 |
0 |
if ($chunk =~ m[^<
(?:!--\s*)?
(
/?[Tt][Mm][Pp][Ll]_
(?:
(?:[Ss][Ee][Tt])
)
) # $1 => $which - start of the tag
\s*
# NAME attribute
(?:
(?:
[Nn][Aa][Mm][Ee]
\s*=\s*
)?
(?:
"([^">]*)" # $2 => double-quoted NAME value "
|
'([^'>]*)' # $3 => single-quoted NAME value
|
([^\s=>]*) # $4 => unquoted NAME value
)
)?
\s*
(?:--)?>
(.*) # $5 => $post - text that comes after the tag
$]sx) { } |
224
|
0 |
0 |
defined $4 ? : |
|
0 |
0 |
defined $3 ? : |
|
0 |
0 |
defined $2 ? : |
229
|
0 |
0 |
unless not defined $name or $$options{'case_sensitive'} |
233
|
0 |
0 |
if ($need_names{$which} and not defined $name && length $name) |
239
|
0 |
0 |
if ($which eq 'TMPL_SET') { } |
|
0 |
0 |
elsif ($which eq '/TMPL_SET') { } |
240
|
0 |
0 |
if ($$options{'debug'}) |
245
|
0 |
0 |
if (@setstack > 0) |
250
|
0 |
0 |
if (exists $$setparamstack{$name}) |
261
|
0 |
0 |
if (@rtext > 0) |
265
|
0 |
0 |
if ($$options{'debug'}) |
271
|
0 |
0 |
unless ($name) |
276
|
0 |
0 |
if ($post) |
277
|
0 |
0 |
if ($$options{'chomp_after_set'}) { } |
286
|
0 |
0 |
if (defined $post) |
288
|
0 |
0 |
if ($set_name) { } |
297
|
0 |
0 |
if (defined $chunk) |
299
|
0 |
0 |
if ($set_name) { } |
315
|
0 |
0 |
if (%{$setparamstack;}) |
317
|
0 |
0 |
if (exists $$set_params{$param}) { } |
318
|
0 |
0 |
if ($$options{'set_order_bottom_up'}) |
327
|
0 |
0 |
unless (exists $$set_params{'___loaded_set_params'}) |
342
|
0 |
0 |
unless defined $set_params and ref $set_params eq 'HASH' and %$set_params |
346
|
0 |
0 |
if $key eq '___loaded_set_params' |
365
|
0 |
0 |
if (exists $$param_map{$param}) { } |
367
|
0 |
0 |
unless (ref $var eq 'HTML::Template::VAR') |
376
|
0 |
0 |
$tag ? : |
386
|
0 |
0 |
if (exists $$self{'options'}{'case_sensitive'} and $$self{'options'}{'case_sensitive'}) { } |
388
|
0 |
0 |
exists $$self{'options'}{'env_names_to_lower_case'} && $$self{'options'}{'env_names_to_lower_case'} ? : |
394
|
0 |
0 |
if (exists $$param_map{$name}) |
396
|
0 |
0 |
if (ref $var eq 'HTML::Template::VAR') { } |
412
|
0 |
0 |
if (@args == 1) { } |
424
|
0 |
0 |
unless (exists $$options{'case_sensitive'} and $$options{'case_sensitive'}) |
431
|
0 |
0 |
unless exists $$set_params{$param} |
434
|
0 |
0 |
if ($value) |
447
|
0 |
0 |
unless $param |
449
|
0 |
0 |
if ($set_name eq $param) |
454
|
0 |
0 |
if (exists $$param_map{$param}) { } |
455
|
0 |
0 |
${$$param_map{$param};} ? : |
457
|
0 |
0 |
if ($$options{'associate_env'} and $param =~ /^env_(.+?)$/i) |
459
|
0 |
0 |
if ($env) |
481
|
0 |
0 |
if ($$options{'cache'}) |
486
|
0 |
0 |
if (exists $$self{'options'}{'associate_env'} and $$self{'options'}{'associate_env'}) |
491
|
0 |
0 |
if (ref $set_params eq 'HASH') |
493
|
0 |
0 |
if $name eq '___loaded_set_params' |
503
|
0 |
0 |
if ($$options{'cache'}) |
522
|
0 |
0 |
if ($$options{'debug'}) |