| line |
true |
false |
branch |
|
33
|
0 |
124 |
if $phrase =~ /~~/
|
|
35
|
20 |
104 |
unless $phrase =~ /(?:$opening_bn|$closing_bn)/
|
|
65
|
188 |
255 |
if (defined $bn_inside) { }
|
|
66
|
6 |
182 |
if ($bn_inside =~ /(?:$closing_bn|$opening_bn)/)
|
|
84
|
0 |
255 |
if ($match =~ /(?:$opening_bn|$closing_bn)/)
|
|
92
|
0 |
98 |
unless @struct
|
|
95
|
10 |
88 |
if (struct2phrase(\@struct) ne $phrase)
|
|
107
|
183 |
252 |
if (ref $_) { }
|
|
112
|
6 |
2 |
if $_[0] =~ /$opening_bn/
|
|
118
|
3 |
1 |
if $len == 1 and ref $_[0][0] or $len > 1
|
|
123
|
2 |
6 |
if $_[0] =~ /\A$opening_bn(?:\~[\[\]]|[^\[\]])+$closing_bn\z/x
|
|
128
|
9 |
97 |
if @{$_[0];} == 1 and ref $_[0][0]
|
|
135
|
3 |
401 |
$limit ? :
|
|
199
|
180 |
193 |
if $i < $skip_to
|
|
200
|
13 |
180 |
if $list->[$i] =~ /\A$bn_var_arg\z/
|
|
213
|
107 |
290 |
if $len == 1 and $list->[0] =~ /\A$bn_var_arg\z/
|
|
216
|
14 |
276 |
unless defined $list->[0] and $list->[0] =~ /\A(?:$ns_regexp|\*|\#)\z/
|
|
217
|
1 |
275 |
if $list->[0] eq "output" and not defined $list->[1] && $list->[1] =~ /\A$ns_regexp\z/
|
|
220
|
47 |
206 |
if exists $meth{$list->[0]} and ref $meth{$list->[0]} ne 'CODE' || $meth{$list->[0]}($list)
|
|
222
|
206 |
0 |
if (exists $basic{$list->[0]} and ref $basic{$list->[0]} ne 'CODE' || $basic{$list->[0]}($list))
|
|
226
|
206 |
0 |
if ($list->[0] eq "output")
|
|
227
|
131 |
75 |
if ($list->[1] =~ /\A(?:underline|strong|em|class|attr|inline|block|sup|sub)\z/)
|
|
230
|
36 |
9 |
if ($list->[2] =~ /\A$bn_var_arg\z/ and !exists $attr{'title'} || $attr{'title'} =~ /\A$bn_var_arg\z/ and !exists $attr{'alt'} || $attr{'alt'} =~ /\A$bn_var_arg\z/)
|
|
238
|
42 |
128 |
if ($list->[1] =~ /\A(?:img|abbr|acronym)\z/)
|
|
244
|
12 |
3 |
if ($list->[2] =~ /\A$bn_var_arg\z/ and $list->[3] =~ /\A$bn_var_arg\z/ and !exists $attr{'title'} || $attr{'title'} =~ /\A$bn_var_arg\z/ and !exists $attr{'alt'} || $attr{'alt'} =~ /\A$bn_var_arg\z/)
|
|
256
|
22 |
0 |
if exists $complex{$list->[0]} and ref $complex{$list->[0]} ne 'CODE' || $complex{$list->[0]}($list)
|