| line |
true |
false |
branch |
|
49
|
0 |
33 |
if $HTML::Transmorgify::Metatags::debug |
|
51
|
33 |
0 |
if (defined $static_name) |
|
52
|
0 |
33 |
if $static_name =~ /^[\s_]/ |
|
53
|
4 |
29 |
if (defined $static_value) |
|
57
|
0 |
4 |
if $HTML::Transmorgify::Metatags::debug |
|
69
|
0 |
29 |
if (defined $raw_value) { } |
|
82
|
0 |
29 |
if $HTML::Transmorgify::Metatags::debug |
|
84
|
0 |
29 |
if $name =~ /^ / |
|
87
|
27 |
2 |
if (@$buf == 1 and not ref $$buf[0] or not $attr->boolean('eval', undef, 0)) { } |
|
94
|
0 |
27 |
if $HTML::Transmorgify::Metatags::debug |
|
95
|
27 |
0 |
if $attr->last_position(0) |
|
98
|
0 |
27 |
if $HTML::Transmorgify::Metatags::debug |
|
104
|
0 |
27 |
if (@$r > 1) { } |
|
117
|
0 |
0 |
if $HTML::Transmorgify::Metatags::debug |
|
120
|
0 |
27 |
if $HTML::Transmorgify::Metatags::debug |
|
127
|
0 |
3 |
if $HTML::Transmorgify::Metatags::debug |
|
129
|
3 |
0 |
if $attr->last_position(0) |
|
130
|
0 |
3 |
if $HTML::Transmorgify::Metatags::debug |
|
136
|
0 |
29 |
if $HTML::Transmorgify::Metatags::debug |
|
145
|
0 |
0 |
unless $closed |
|
151
|
0 |
0 |
if $HTML::Transmorgify::Metatags::debug |
|
156
|
0 |
0 |
unless $ifile |
|
204
|
0 |
27 |
unless $closed |
|
220
|
0 |
27 |
if $HTML::Transmorgify::Metatags::debug |
|
224
|
0 |
27 |
if $HTML::Transmorgify::Metatags::debug |
|
234
|
0 |
31 |
unless defined $$textref |
|
235
|
28 |
3 |
unless $diversion_playback{$ready} |
|
248
|
0 |
27 |
unless $diversion_graph->alldone |
|
258
|
0 |
4 |
if $closed |
|
267
|
0 |
4 |
unless my $name = $static_name |
|
268
|
0 |
4 |
unless defined $name |
|
271
|
0 |
4 |
if $HTML::Transmorgify::Metatags::debug |
|
275
|
0 |
4 |
if $HTML::Transmorgify::Metatags::debug |
|
283
|
0 |
5 |
unless $closed |
|
287
|
0 |
5 |
unless my $name = $static_name |
|
288
|
0 |
5 |
unless defined $diversion_current |
|
310
|
0 |
0 |
if $HTML::Transmorgify::Metatags::debug |
|
312
|
0 |
0 |
if (not $$vals{'height'} || $$vals{'width'} and $$vals{'src'}) |
|
314
|
0 |
0 |
if $file |
|
332
|
0 |
0 |
if (not $closed and $$HTML::Transmorgify::textref =~ m[
(.*?)
]
]cgsx) { } |
|
366
|
0 |
0 |
if $closed |
|
371
|
0 |
0 |
unless $transformations{$encode} |
|
379
|
0 |
0 |
if $HTML::Transmorgify::Metatags::debug |
|
402
|
0 |
17 |
if $HTML::Transmorgify::Metatags::debug |
|
406
|
17 |
2 |
if ($refines[0] =~ /^\d{1,4}$/) { } |
|
411
|
1 |
18 |
if (blessed $ref) { } |
|
|
1 |
17 |
elsif (ref $ref eq 'ARRAY') { } |
|
|
17 |
0 |
elsif (ref $ref eq 'HASH') { } |
|
434
|
9 |
24 |
if ($name =~ /(.+)\.([^\.]+)/) { } |
|
437
|
0 |
9 |
if (blessed $container) { } |
|
|
2 |
7 |
elsif (ref $container eq 'HASH') { } |
|
|
7 |
0 |
elsif (ref $container eq 'ARRAY') { } |
|
462
|
0 |
135 |
if ($HTML::Transmorgify::Metatags::debug) |
|
464
|
0 |
135 |
unless (defined $name and length $name) |
|
465
|
0 |
0 |
if $HTML::Transmorgify::Metatags::debug |
|
469
|
0 |
135 |
if $name =~ /^ / |
|
473
|
16 |
119 |
unless (exists $HTML::Transmorgify::variables{$primary}) |
|
474
|
16 |
0 |
if (defined $create) { } |
|
477
|
0 |
0 |
if $HTML::Transmorgify::Metatags::debug |
|
484
|
0 |
119 |
if $HTML::Transmorgify::Metatags::debug |
|
489
|
3 |
8 |
if (blessed $r) { } |
|
|
8 |
0 |
elsif (ref $r) { } |
|
493
|
4 |
4 |
if (reftype $r eq 'ARRAY') { } |
|
|
4 |
0 |
elsif (reftype $r eq 'HASH') { } |
|
494
|
0 |
4 |
unless ($key =~ /\A\d+\z/) |
|
507
|
1 |
10 |
if (defined $create and not defined $new) |
|
528
|
16 |
100 |
if (ref $r) |
|
529
|
0 |
16 |
if (blessed $r) { } |
|
|
3 |
13 |
elsif (reftype $r eq 'CODE') { } |
|
|
13 |
0 |
elsif (reftype $r eq 'ARRAY') { } |
|
|
0 |
0 |
elsif (reftype $r eq 'HASH') { } |
|
545
|
0 |
116 |
if ref $r |
|
547
|
0 |
116 |
unless defined $r |
|
560
|
0 |
96 |
if $HTML::Transmorgify::Metatags::debug |
|
564
|
0 |
96 |
unless $transformations{$encode} |
|
566
|
0 |
96 |
if $HTML::Transmorgify::Metatags::debug |
|
568
|
0 |
96 |
if $HTML::Transmorgify::Metatags::debug |
|
570
|
96 |
0 |
if defined $r |
|
571
|
0 |
96 |
if $HTML::Transmorgify::Metatags::debug |
|
583
|
0 |
5 |
if $closed |
|
594
|
0 |
7 |
if $HTML::Transmorgify::Metatags::debug |
|
599
|
7 |
0 |
if ($lastpos > 0) { } |
|
607
|
0 |
7 |
unless @containers |
|
611
|
0 |
10 |
if $HTML::Transmorgify::Metatags::debug |
|
612
|
0 |
10 |
if (blessed $r) |
|
615
|
0 |
0 |
unless (@e == 1 and ref $r) |
|
621
|
9 |
1 |
if (reftype $r eq 'ARRAY') { } |
|
|
1 |
0 |
elsif (reftype $r eq 'HASH') { } |
|
|
0 |
0 |
elsif (ref $r) { } |
|
|
0 |
0 |
elsif (defined $r) { } |
|
623
|
35 |
3 |
exists $$r[$i++] ? : |
|
657
|
0 |
17 |
if $closed |
|
671
|
0 |
8 |
if $closed |
|
687
|
0 |
17 |
if $$current{'rbuf'} |
|
694
|
0 |
25 |
if $$s{'attr'}->static('trim') |
|
706
|
0 |
17 |
if $counters{'else'} > 1 |
|
707
|
0 |
17 |
if $counters{'if'} > 1 |
|
710
|
5 |
20 |
if $$s{'attr'}->tag eq 'else' |
|
715
|
0 |
21 |
if $HTML::Transmorgify::Metatags::debug |
|
717
|
17 |
16 |
unless $$s{'attr'}->tag eq 'else' or $$s{'evaluate'}() |
|
740
|
10 |
10 |
if (exists $$vals{'is_set'}) { } |
|
|
10 |
0 |
elsif (exists $$vals{'expr'}) { } |
|
742
|
0 |
20 |
if $HTML::Transmorgify::Metatags::debug |
|
747
|
0 |
10 |
unless $expr |
|
760
|
0 |
0 |
if $file =~ m[^/] |
|
762
|
0 |
0 |
if (ref $i and ref $i eq 'CODE') { } |
|
|
0 |
0 |
elsif (ref $i) { } |
|
764
|
0 |
0 |
if $x and -e $x |
|
768
|
0 |
0 |
unless -e "$i/$file" |
|
787
|
2 |
61 |
if (@$buf and boolean($trim, 0)) |
|
788
|
1 |
1 |
if ($trim eq 'all') { } |
|
792
|
1 |
0 |
if ($trim ne 'end') |
|
793
|
1 |
0 |
unless ref $$buf[0] |
|
796
|
0 |
1 |
if ($trim ne 'start') |
|
797
|
0 |
0 |
unless ref $$buf[$#$buf] |