| line |
true |
false |
branch |
|
32
|
10 |
0 |
if (@_ == 1) { } |
|
33
|
4 |
6 |
ref $_[0] eq 'SCALAR' ? : |
|
37
|
0 |
0 |
ref $_[0] eq 'SCALAR' ? : |
|
|
0 |
0 |
if scalar(@_) % 2 == 1 |
|
57
|
58 |
57 |
unless $type eq "S" or $type eq "E" |
|
58
|
21 |
36 |
if $type eq "E" |
|
59
|
36 |
21 |
unless @_ |
|
61
|
5 |
19 |
if $token->[0] eq $_ |
|
70
|
9 |
1 |
unless exists $self->{'textify'}{$tag} |
|
74
|
0 |
1 |
if (ref $alt) { } |
|
78
|
0 |
1 |
unless defined $text |
|
90
|
9 |
10 |
if ($type eq 'T') { } |
|
|
9 |
1 |
elsif ($type =~ /^[SE]$/) { } |
|
92
|
9 |
0 |
unless $token->[2] |
|
96
|
5 |
4 |
if ($type eq 'S') { } |
|
97
|
1 |
4 |
if (defined(my $text = _textify($self, $token))) |
|
104
|
5 |
3 |
if (not @_ or grep(($_ eq $tag), @_)) |
|
109
|
1 |
2 |
if $tag eq "br" or not $HTML::Tagset::isPhraseMarkup{$token->[1]} |
|
129
|
9 |
10 |
if ($type eq 'T') { } |
|
|
10 |
0 |
elsif ($type =~ /^[SE]$/) { } |
|
131
|
9 |
0 |
unless $token->[2] |
|
135
|
5 |
5 |
if ($type eq "S") |
|
136
|
0 |
5 |
if (defined(my $text = _textify($self, $token))) |
|
141
|
3 |
7 |
unless ($HTML::Tagset::isPhraseMarkup{$tag}) |
|
145
|
1 |
6 |
if $tag eq "br" |