| line |
true |
false |
branch |
|
31
|
0 |
14 |
unless my $type = shift() |
|
32
|
0 |
14 |
if $type eq 'file' |
|
33
|
0 |
14 |
if $type eq 'choose' or $type eq 'select' |
|
34
|
14 |
0 |
if $type eq 'text' |
|
112
|
0 |
0 |
unless -r $filename |
|
119
|
0 |
14 |
ref $txt ? : |
|
126
|
0 |
14 |
if $$s[COMPILED()] |
|
142
|
0 |
36 |
if ($full_matched eq '$$') { } |
|
146
|
17 |
19 |
if ($varname) |
|
154
|
2 |
15 |
defined $format ? : |
|
164
|
0 |
0 |
unless $varhash{$b} <=> $varhash{$a} |
|
178
|
13 |
2 |
$varlen >= 4 ? : |
|
191
|
17 |
14 |
if ($$chunk{'full_matched'}) { } |
|
217
|
14 |
0 |
if $$s[COMPILED()] or defined $$s[TEXT()] or not defined $$s[FILENAME()] |
|
218
|
0 |
0 |
unless (open FILE, $$s[FILENAME()]) |
|
249
|
0 |
0 |
ref $b ? : |
|
255
|
0 |
0 |
if (@path) { } |
|
266
|
0 |
0 |
defined $template ? : |
|
269
|
0 |
0 |
@_ ? : |
|
272
|
0 |
0 |
unless $$s[styles()] |
|
279
|
0 |
0 |
if exists $$act{$i} |
|
288
|
0 |
0 |
if (exists $$act{''}) |
|
294
|
0 |
0 |
ref $retval eq 'SCALAR' ? : |