| line |
true |
false |
branch |
|
36
|
0 |
10 |
if (ref $path eq 'IO::File') { } |
|
40
|
0 |
10 |
unless open FILE, "$path" |
|
67
|
0 |
0 |
if (@_ > 1) { } |
|
76
|
1 |
0 |
if (@_ > 1) { } |
|
77
|
0 |
1 |
unless $val == 1 or $val == 0 |
|
106
|
10 |
0 |
if ($next ne ' EOF ') |
|
119
|
2 |
105 |
if ($next =~ /^(?:|#.*)$/) { } |
|
|
12 |
93 |
elsif ($next =~ /^}/) { } |
|
154
|
34 |
95 |
if ($next =~ /^\@prefix|\@keywords|bind$/) { } |
|
158
|
59 |
36 |
unless $subject |
|
171
|
95 |
0 |
if @$properties |
|
175
|
93 |
36 |
if ($next eq '.') { } |
|
|
0 |
36 |
elsif ($next =~ /^\.(.*)$/) { } |
|
|
36 |
0 |
elsif ($next =~ /^(?:\]|\)|\})/) { } |
|
192
|
51 |
288 |
if ($next =~ /^[\[\{\(]/) { } |
|
|
6 |
282 |
elsif ($next eq 'this') { } |
|
|
260 |
22 |
elsif ($next =~ /^(<[^>]*>|^(?:[_a-zA-Z]\w*)?:[_a-zA-Z][_\w]*)(.*)$/) { } |
|
|
22 |
0 |
elsif ($$self{'keywords'}[0] and $next =~ /^(^[_a-zA-Z][_\w]*)(.*)$/) { } |
|
204
|
3 |
257 |
if ($2) |
|
216
|
0 |
22 |
if $2 |
|
233
|
33 |
1 |
if ($tk eq '@prefix') { } |
|
|
1 |
0 |
elsif ($tk eq '@keywords') { } |
|
235
|
33 |
0 |
if ($tk =~ /^([_a-zA-Z]\w*)?:$/) { } |
|
242
|
26 |
7 |
if ($pref) { } |
|
259
|
1 |
0 |
if ($kw =~ /^(.+)\.$/) { } |
|
278
|
8 |
307 |
if ($next =~ /^(.+)\.$/) |
|
286
|
127 |
188 |
if ($tk =~ /^<[^>]*>$/) { } |
|
|
188 |
0 |
elsif ($tk =~ /^([_a-zA-Z]\w*)?:[a-zA-Z]\w*$/) { } |
|
294
|
142 |
46 |
if $1 |
|
295
|
0 |
188 |
if ($pref eq '_') |
|
296
|
0 |
0 |
unless $$self{'ns'}{$$self{'context'}}{'_'} |
|
301
|
5 |
183 |
if $tk =~ /_/ |
|
317
|
0 |
140 |
if ($next =~ /^:-/) { } |
|
|
0 |
140 |
elsif ($next =~ /^\./) { } |
|
334
|
0 |
140 |
if $next eq 'is' or $next eq '<-' |
|
340
|
45 |
95 |
if ($next eq ';') |
|
352
|
0 |
140 |
if ($next eq 'has') { } |
|
|
0 |
140 |
elsif ($next eq '>-') { } |
|
|
0 |
140 |
elsif ($next eq 'is') { } |
|
|
0 |
140 |
elsif ($next eq '<-') { } |
|
|
14 |
126 |
elsif ($next eq 'a') { } |
|
|
0 |
126 |
elsif ($next =~ /^=(.*)/) { } |
|
360
|
0 |
0 |
unless $tk eq '->' |
|
367
|
0 |
0 |
unless $tk eq 'of' |
|
374
|
0 |
0 |
unless $tk eq '-<' |
|
384
|
0 |
0 |
if $1 |
|
415
|
6 |
140 |
if ($next eq ',') |
|
427
|
23 |
154 |
if ($next =~ /^("(?:\\"|[^\"])*")([\.;,\]\}\)])*$/) { } |
|
430
|
0 |
23 |
if $2 |
|
448
|
1 |
67 |
if $2 |
|
450
|
36 |
32 |
if ($1 eq '[') { } |
|
|
12 |
20 |
elsif ($1 eq '{') { } |
|
456
|
0 |
36 |
if ($next =~ /^\](.)*$/) { } |
|
466
|
1 |
35 |
if ($tk =~ /^\](.+)$/) { } |
|
|
0 |
35 |
elsif ($tk ne ']') { } |
|
496
|
12 |
0 |
if ($tk =~ /^\}([,;\.\]\}\)])?$/) { } |
|
497
|
3 |
9 |
if $1 |
|
508
|
3 |
17 |
if ($next =~ /^\)(.*)$/) { } |
|
511
|
0 |
3 |
if $1 |
|
522
|
17 |
0 |
if ($next =~ /^([^)]*)\)([,;\.\]\}\)]*)$/) |
|
524
|
10 |
7 |
if $2 |
|
526
|
0 |
17 |
if ($1) |
|
543
|
17 |
14 |
if $i == scalar @nodes |
|
562
|
13 |
35 |
if ($$self{'quantif'}) |
|
591
|
0 |
286 |
if ($next =~ /^#/) |
|
702
|
0 |
0 |
if $n > 100 |