| line |
true |
false |
branch |
|
96
|
0 |
0 |
&FileHandle()->check($_[0]) ? : |
|
98
|
0 |
0 |
defined $fh ? : |
|
119
|
4 |
1 |
unless $self->escape |
|
130
|
5 |
0 |
if ($self->has_signature) { } |
|
138
|
5 |
0 |
if ($self->has_signature) |
|
147
|
0 |
7 |
unless $name =~ /\A[A-Z][A-Z0-9_]*\z/i |
|
149
|
0 |
7 |
if (&Bool()->check($type)) |
|
150
|
0 |
0 |
$type ? : |
|
161
|
0 |
7 |
if ($type->is_a_type_of(&HashRef())) |
|
167
|
1 |
6 |
if ($type->is_a_type_of(&ArrayRef())) |
|
178
|
2 |
3 |
if ($self->trim) |
|
182
|
1 |
4 |
if (my $outdent = $self->outdent) |
|
183
|
1 |
0 |
$outdent > 0 ? : |
|
197
|
7 |
24 |
if ($next eq $delims[0]) |
|
198
|
7 |
0 |
$mode eq 'text' ? : |
|
202
|
7 |
17 |
if ($next eq $delims[1]) |
|
203
|
7 |
0 |
$mode eq 'code' ? : |
|
207
|
10 |
7 |
$mode eq 'text' ? : |
|
212
|
10 |
7 |
if ($mode eq 'text') { } |
|
|
6 |
1 |
elsif ($next =~ /\A=/) { } |
|
214
|
6 |
4 |
if ($next =~ /\n/ms) |
|
222
|
2 |
4 |
$self->has_escape ? : |
|
234
|
2 |
3 |
if ($self->trim) |
|
238
|
0 |
5 |
if ($self->has_post_process) { } |
|
255
|
0 |
1 |
if &CodeRef()->check($style) |
|
259
|
1 |
0 |
if ($style eq 'html') |
|
264
|
0 |
0 |
if ($style eq 'xml') |