| line |
true |
false |
branch |
|
158
|
1 |
6 |
if (scalar @{$$self{'nest'};} == 1) |
|
162
|
1 |
5 |
if ($$nest{'depth'} >= 0) |
|
164
|
0 |
1 |
unless $$nest{'depth'} == -1 |
|
185
|
12 |
102 |
if ($$nest{'depth'} == -1) |
|
190
|
63 |
39 |
if (scalar @{$$self{'nest'};} == 1) { } |
|
191
|
14 |
49 |
unless (defined $canon) |
|
193
|
0 |
14 |
unless $$nest{'depth'} == -1 |
|
196
|
1 |
38 |
if (not defined $canon) { } |
|
|
38 |
0 |
elsif ($$canon[0] =~ /^(?:start|end)$/) { } |
|
199
|
22 |
16 |
if ($$canon[1] eq $$nest{'tagname'}) |
|
200
|
9 |
13 |
if ($$canon[0] eq 'start') { } |
|
204
|
9 |
4 |
if ($$nest{'depth'} == -1) |
|
225
|
6 |
11 |
if (scalar @{$$self{'nest'};} == 1) { } |
|
226
|
3 |
3 |
unless (defined $canon) |
|
228
|
0 |
3 |
unless $$nest{'depth'} == 0 |
|
231
|
2 |
9 |
if (not defined $canon) { } |
|
|
9 |
0 |
elsif ($$canon[0] =~ /^(?:start|end)$/) { } |
|
233
|
0 |
2 |
unless $$nest{'depth'} == 0 |
|
237
|
8 |
1 |
if ($$canon[1] eq $$nest{'tagname'}) |
|
238
|
7 |
1 |
if ($$canon[0] eq 'start') { } |
|
240
|
1 |
6 |
if ($$nest{'depth'} == -1) |
|
264
|
1 |
22 |
unless (defined $args{'start'} and defined $args{'end'}) |
|
269
|
51 |
81 |
if (defined $args{$_}) |
|
278
|
44 |
58 |
if (defined $$arg_idx{$_} and $$arg_idx{$_} == -1) { } |
|
|
1 |
57 |
elsif (defined $$arg_idx{$_} and !defined($$argspec_info{$event}{$_}) || $$arg_idx{$_} != $$argspec_info{$event}{$_}) { } |
|
291
|
2 |
20 |
if (defined $$arg_idx{'event_idx'}) { } |
|
|
18 |
2 |
elsif (defined $$arg_idx{'string_idx'}) { } |
|
295
|
1 |
17 |
if (keys %strs != keys %$argspec_info) |
|
304
|
18 |
1 |
if (defined $$argspec_info{'start'}{'tagname_idx'} and defined defined $$argspec_info{'end'}{'tagname_idx'}) { } |
|
322
|
9 |
183 |
if ($argspec[$i] eq 'event' and not defined $event_idx) { } |
|
|
42 |
141 |
elsif ($argspec[$i] eq 'tagname' and not defined $tagname_idx) { } |
|
|
39 |
204 |
elsif (my($str) = $argspec[$i] =~ /^'(.+)'$/ and not defined $string_idx) { } |
|
342
|
20 |
108 |
if (not defined $token) { } |
|
|
5 |
103 |
elsif (defined $$self{'arg_info'}{'event_idx'}) { } |
|
|
103 |
0 |
elsif (defined $$self{'arg_info'}{'string_idx'}) { } |
|
346
|
1 |
4 |
unless ($$canon[0] =~ /^(?:start|end)$/) |
|
348
|
79 |
24 |
if ($$token[$$self{'arg_info'}{'string_idx'}] eq $$self{'arg_info'}{'start_string'}) { } |
|
|
22 |
2 |
elsif ($$token[$$self{'arg_info'}{'string_idx'}] eq $$self{'arg_info'}{'end_string'}) { } |
|
357
|
82 |
26 |
if ($$canon[0] eq 'start') { } |
|
|
23 |
3 |
elsif ($$canon[0] eq 'end') { } |