| line |
true |
false |
branch |
|
102
|
0 |
4 |
if defined $result_index{$type} |
|
110
|
210 |
0 |
if ref $_ |
|
|
0 |
210 |
if grep {reftype $_ ne 'CODE' if ref $_;} @_ |
|
126
|
275 |
11 |
unless defined $b |
|
128
|
0 |
11 |
if $b eq 'false' |
|
129
|
0 |
11 |
if $b eq 'no' |
|
130
|
0 |
11 |
if $b eq 'off' |
|
131
|
0 |
11 |
if $b eq '' |
|
132
|
9 |
2 |
if $b |
|
158
|
8 |
11 |
if ref $pkg |
|
159
|
4 |
15 |
if defined $module_bits{$pkg} |
|
171
|
68 |
0 |
if (not $dispatch{$t}) { } |
|
|
0 |
0 |
elsif ($dispatch{$t}->exclusive) { } |
|
184
|
0 |
7 |
if $priorities{$tag_pkg} and $priorities{$tag_pkg} != $priority |
|
188
|
29 |
0 |
if (not $dispatch{$t}) { } |
|
|
0 |
0 |
elsif ($dispatch{$t}->exclusive) { } |
|
214
|
11 |
0 |
$tag_pkg ? : |
|
223
|
8 |
3 |
if (ref $_[0]) |
|
227
|
11 |
0 |
if (ref $tobj) { } |
|
|
0 |
0 |
elsif ($intercept_okay) { } |
|
237
|
11 |
0 |
$tag_pkg ? : |
|
256
|
0 |
37 |
unless blessed $self |
|
263
|
37 |
0 |
if ref $_[0] |
|
274
|
0 |
37 |
if wantarray |
|
286
|
126 |
180 |
unless $_[0] |
|
291
|
280 |
301 |
if (ref $i) { } |
|
293
|
0 |
280 |
unless reftype $i eq 'CODE' |
|
296
|
0 |
301 |
if $debug |
|
306
|
68 |
6 |
unless exists $$h{$key} |
|
316
|
0 |
0 |
unless defined $s |
|
317
|
0 |
0 |
if grep {$_ > length $s;} @pos |
|
328
|
0 |
89 |
if $debug |
|
336
|
0 |
73 |
if $debug |
|
338
|
0 |
73 |
unless defined $$textref |
|
341
|
1 |
72 |
if ($cached) |
|
342
|
0 |
1 |
if $debug |
|
350
|
0 |
72 |
if ($wrap_compile_cb) { } |
|
357
|
0 |
72 |
if $debug |
|
364
|
0 |
65 |
unless $onetag |
|
371
|
55 |
10 |
unless wantarray |
|
382
|
55 |
93 |
$$opts{'tag_package'} ? : |
|
385
|
0 |
148 |
if $debug |
|
388
|
0 |
148 |
if $debug |
|
389
|
76 |
72 |
if ($onetag) { } |
|
392
|
0 |
76 |
unless defined $finaltag and $finaltag eq "/$onetag" |
|
397
|
0 |
148 |
if $debug |
|
403
|
0 |
148 |
if $debug |
|
405
|
0 |
328 |
if $debug |
|
408
|
22 |
306 |
unless ($$textref =~ m[ \G < ( /? [^>\s]+ ) ]cgx) |
|
414
|
294 |
12 |
if ($dispatch{$tag}) { } |
|
|
9 |
3 |
elsif ($dispatch{'macro'}) { } |
|
417
|
199 |
95 |
if ($before - $copied) |
|
418
|
0 |
199 |
if $debug |
|
442
|
0 |
294 |
if $debug |
|
445
|
76 |
218 |
if ($r and $r == 22) |
|
446
|
0 |
76 |
if $debug |
|
449
|
0 |
218 |
if $debug |
|
452
|
6 |
3 |
if ($$textref =~ / \G (?: [^'">] | '[^'<>]*' | "[^"<>]*" )* > /cgx) { } |
|
454
|
0 |
6 |
if $debug |
|
456
|
0 |
3 |
if $debug |
|
476
|
3 |
0 |
if (grep {/
|
|
477
|
0 |
3 |
if $debug |
|
480
|
0 |
3 |
if ($before - $copied) |
|
481
|
0 |
0 |
if $debug |
|
487
|
0 |
3 |
if $debug |
|
489
|
0 |
0 |
if $debug |
|
495
|
0 |
3 |
if $debug |
|
497
|
36 |
127 |
if (@$rbuf > 1 and not ref $$rbuf[-1] and not ref $$rbuf[-2]) |
|
502
|
0 |
72 |
if $debug |
|
503
|
25 |
47 |
if length $boring |
|
511
|
0 |
0 |
if ($context{'attr'}) |
|
517
|
0 |
0 |
if ($context{'starting_attr'}) |
|
601
|
2 |
276 |
if (defined $pos and $pos <= $lastpos) |
|
604
|
46 |
230 |
if (exists $vals{$at}) |
|
605
|
46 |
0 |
if defined $vals{$at} |
|
613
|
118 |
542 |
if (defined $pos and $pos <= $lastpos) |
|
616
|
213 |
329 |
unless exists $vals{$at} |
|
617
|
310 |
19 |
unless ($needs_cooking{$at}) |
|
618
|
307 |
3 |
if defined $vals{$at} |
|
622
|
0 |
19 |
if $dbug |
|
624
|
9 |
10 |
unless ($cooked{$at}) |
|
632
|
0 |
19 |
if $dbug |
|
634
|
0 |
19 |
if $dbug |
|
636
|
0 |
19 |
if @rtmp > 1 |
|
643
|
44 |
76 |
if (defined $pos and $pos <= $lastpos) |
|
646
|
74 |
2 |
unless exists $vals{$at} |
|
647
|
0 |
2 |
unless defined $vals{$at} |
|
648
|
2 |
0 |
unless $needs_cooking{$at} |
|
658
|
0 |
0 |
if (defined $res) |
|
659
|
0 |
0 |
if defined $rv |
|
663
|
0 |
108 |
if defined $rv |
|
666
|
0 |
0 |
if defined $hidden[$i] |
|
671
|
22 |
200 |
if defined $hidden{$a} |
|
672
|
182 |
18 |
if (defined $$atvals[$j * 2 + 1]) { } |
|
682
|
0 |
108 |
if $dbug |
|
692
|
20 |
14 |
unless (exists $vals{$k}) |
|
696
|
0 |
34 |
if $dbug |
|
742
|
30 |
7 |
@_ ? : |
|
754
|
43 |
0 |
if @_ |
|
761
|
117 |
106 |
$opts{'raw'} ? : |
|
764
|
30 |
193 |
unless defined $default |
|
771
|
0 |
0 |
ref $tag ? : |
|
773
|
0 |
0 |
unless ($attr->static($t) or not defined $attr->raw($t)) |
|
784
|
43 |
52 |
if ($$self[12]) { } |
|
799
|
0 |
182 |
if (not defined $val) { } |
|
|
6 |
176 |
elsif (not $val =~ /[^\w.]/ || $is_val && $HTML::Transmorgify::xml_quoting) { } |
|
|
0 |
176 |
elsif ($val =~ /'/) { } |
|
824
|
0 |
0 |
if $HTML::Transmorgify::debug |
|
828
|
0 |
0 |
unless $cb |
|
833
|
0 |
0 |
if $cb2 |
|
835
|
0 |
0 |
if ($rv) |
|
836
|
0 |
0 |
if $HTML::Transmorgify::debug |
|
876
|
0 |
143 |
if $HTML::Transmorgify::debug |
|
878
|
0 |
143 |
unless ($cb) |
|
879
|
0 |
0 |
if $HTML::Transmorgify::debug |
|
884
|
0 |
143 |
if ($rv) { } |
|
|
0 |
143 |
elsif ($HTML::Transmorgify::debug) { } |
|
886
|
0 |
0 |
if $HTML::Transmorgify::debug |
|
888
|
0 |
0 |
if $HTML::Transmorgify::debug |
|
921
|
0 |
95 |
if $HTML::Transmorgify::debug |
|
926
|
12 |
83 |
unless ($cb) |
|
927
|
0 |
12 |
if $HTML::Transmorgify::debug |
|
930
|
0 |
83 |
if $HTML::Transmorgify::debug |
|
932
|
0 |
83 |
if (ref $r and ref $r eq 'CODE') |
|
936
|
0 |
95 |
if (@rt_callback) |
|
941
|
0 |
95 |
if $HTML::Transmorgify::debug |
|
942
|
8 |
87 |
if (@HTML::Transmorgify::queued_captures) { } |
|
|
11 |
76 |
elsif (keys %HTML::Transmorgify::queued_intercepts) { } |
|
943
|
0 |
8 |
if $HTML::Transmorgify::debug |
|
951
|
0 |
11 |
if $HTML::Transmorgify::debug |
|
990
|
76 |
0 |
if ($$self) { } |
|
991
|
0 |
76 |
if $HTML::Transmorgify::debug |
|
994
|
0 |
0 |
if $HTML::Transmorgify::debug |
|
1024
|
9 |
0 |
if ($$self[0]) { } |