| line |
true |
false |
branch |
|
29
|
1 |
3 |
if ($self->{'xml'}) { } |
|
40
|
3 |
0 |
if (scalar @{$self->{'tmp_code'};}) |
|
108
|
1 |
28 |
if ($self->{'attr_delimeter'} ne '"' and $self->{'attr_delimeter'} ne q[']) |
|
166
|
51 |
191 |
unless ($self->{'process'}) |
|
178
|
9 |
137 |
if ($self->{'raw_tag'}) { } |
|
184
|
85 |
52 |
if ($self->{'process'} and $pre_pre == 0) |
|
195
|
61 |
0 |
if ($string) |
|
196
|
9 |
52 |
if ($string =~ m[^/>$]ms) |
|
204
|
4 |
57 |
if ($self->{'comment_flag'} == 0 and scalar @{$self->{'tmp_comment_code'};}) { } |
|
217
|
4 |
0 |
unless ($self->{'non_indent'} or $pre) |
|
224
|
0 |
4 |
$pre ? : |
|
229
|
4 |
0 |
unless ($self->{'non_indent'} or $pre) |
|
236
|
57 |
0 |
unless ($self->{'non_indent'} or $pre) |
|
243
|
0 |
57 |
$pre ? : |
|
248
|
57 |
0 |
unless ($self->{'non_indent'} or $pre) |
|
270
|
46 |
0 |
unless ($self->{'non_indent'} or $pre) |
|
272
|
44 |
2 |
unless ($pre_pre) |
|
277
|
0 |
46 |
$pre ? : |
|
289
|
0 |
20 |
unless (@{$self->{'tmp_code'};}) |
|
294
|
0 |
20 |
if ($self->{'xml'} and not defined $value) |
|
300
|
20 |
0 |
if (defined $value) |
|
307
|
20 |
0 |
if (defined $attr[1]) |
|
323
|
10 |
51 |
if (scalar @{$self->{'tmp_code'};}) |
|
346
|
5 |
1 |
if (scalar @{$self->{'tmp_code'};}) |
|
354
|
1 |
5 |
if (join($EMPTY_STR, @cdata) =~ /]]>$/ms) |
|
370
|
1 |
4 |
$self->{'cdata_indent'} == 1 ? : |
|
385
|
1 |
11 |
if (substr($comments[$LAST_INDEX], $LAST_INDEX) eq '-') { } |
|
392
|
8 |
4 |
if (scalar @{$self->{'tmp_code'};}) { } |
|
412
|
19 |
2 |
if (scalar @{$self->{'tmp_code'};}) |
|
424
|
2 |
19 |
$pre ? : |
|
|
2 |
19 |
$pre ? : |
|
436
|
0 |
55 |
if ($self->{'xml'} and $printed ne $tag) |
|
441
|
22 |
33 |
if ($self->{'xml'} and !scalar(@{$self->{'no_simple'};}) || &none(sub {
$_ eq $tag;
}
, @{$$self{'no_simple'};})) { } |
|
445
|
12 |
10 |
if (scalar @{$self->{'tmp_code'};}) { } |
|
446
|
3 |
9 |
if (scalar @{$self->{'tmp_comment_code'};} and $self->{'comment_flag'} == 1) { } |
|
454
|
9 |
0 |
unless ($self->{'non_indent'} or $pre) |
|
464
|
6 |
27 |
if (scalar @{$self->{'tmp_code'};}) |
|
481
|
0 |
1 |
if (scalar @{$self->{'tmp_code'};}) |
|
486
|
0 |
1 |
if (ref $self->{'instruction'} eq 'CODE') { } |
|
508
|
6 |
5 |
if (scalar @{$self->{'tmp_code'};}) |