| line |
true |
false |
branch |
|
31
|
0 |
41 |
$out =~ /\n/ ? : |
|
54
|
2 |
3 |
$out =~ /\n/ ? : |
|
66
|
17 |
0 |
if ($node =~ /^(\w[\-\w]*) ?((?s:.*)?)$/) |
|
70
|
17 |
0 |
if ($self->can($method)) |
|
72
|
17 |
0 |
if defined $out |
|
82
|
1 |
0 |
ref $node ? : |
|
83
|
0 |
1 |
if (defined $text) { } |
|
89
|
0 |
1 |
$name =~ /\n/ ? : |
|
104
|
1 |
2 |
if ($out =~ /\n/) { } |
|
139
|
2 |
1 |
unless length $text |
|
146
|
0 |
0 |
unless length $text |
|
176
|
7 |
10 |
if (@$class) |
|
179
|
4 |
13 |
if (@$attrib) |
|
181
|
2 |
2 |
/=".*"$/ ? : |
|
184
|
13 |
4 |
length $content ? : |
|
193
|
0 |
17 |
unless $success |
|
201
|
14 |
3 |
if ($args =~ /\A((?:\\:|[^\:])*):((?s:.*))\z/) { } |
|
217
|
10 |
4 |
if ($text =~ s/^\s*(\w[\w\-]*)(?=\s|\z)\s*//) { } |
|
|
2 |
2 |
elsif ($text =~ s/^\s*(\w[\w\-]*="[^"]*")(?=\s|\z)s*//) { } |
|
|
2 |
0 |
elsif ($text =~ s/^\s*(\w[\w\-]*=\S+)(?=\s|\z)s*//) { } |