Branch Coverage

blib/lib/AtteanX/Parser/SPARQLLex.pm
Criterion Covered Total %
branch 93 188 49.4


line true false branch
176 0 1647 if (length $k != 1)
195 0 610 if (length $k != 1)
208 268 5065 unless $t
216 5064 1026 if (scalar @$b) { }
225 630 0 unless (length $self->buffer)
227 86 544 if (defined $line)
232 0 3 if ($codepoint >= 55296 and $codepoint <= 57343)
263 179 1128 if ($l->buffer =~ /^$r\b/u)
265 179 0 $convert ? :
274 358 1312 unless length $self->buffer
276 644 1026 if ($self->buffer =~ /^[ \r\n\t]+/ou)
284 272 754 unless defined $c
286 0 754 if ($c eq "#")
299 179 1128 if (my $t = &$e($self))
304 0 575 if ($c eq "." and $self->buffer =~ /^$r_DECIMAL/u)
308 75 500 if (defined(my $name = $self->lookahead_tokens->{$c})) { }
444 56 elsif (defined(my $method = $self->lookahead_methods->{$c})) { }
55 1 elsif ($c =~ /[A-Za-z\x{00C0}-\x{00D6}\x{00D8}-\x{00F6}\x{00F8}-\x{02FF}\x{0370}-\x{037D}\x{037F}-\x{1FFF}\x{200C}-\x{200D}\x{2070}-\x{218F}\x{2C00}-\x{2FEF}\x{3001}-\x{D7FF}\x{F900}-\x{FDCF}\x{FDF0}-\x{FFFD}\x{10000}-\x{EFFFF}]/ou) { }
0 1 elsif ($c eq '^') { }
1 0 elsif ($c eq '&') { }
311 13 42 if ($self->buffer =~ /^a(?!:)\s/ou) { }
0 42 elsif ($self->buffer =~ /^(?:true|false)(?!:)\b/ou) { }
0 42 elsif ($self->buffer =~ /^BASE(?!:)\b/iou) { }
0 42 elsif ($self->buffer =~ /^PREFIX(?!:)\b/iou) { }
330 0 0 if ($self->buffer =~ /^\^\^/u) { }
352 35 18 if ($self->buffer =~ /^$r_PNAME_LN/ou) { }
16 2 elsif ($self->buffer =~ /$r_PNAME_NS/u) { }
368 0 142 if (substr($self->buffer, 0, 1) eq '$') { }
370 0 0 if ($self->buffer =~ /^$r_VARNAME/u) { }
378 142 0 if ($self->buffer =~ /^$r_VARNAME/u) { }
390 82 13 if ($buffer =~ /^<([^<>"{}|^`\x00-\x20])*>/u) { }
0 13 elsif (substr($buffer, 0, 2) eq '<=') { }
0 13 elsif (substr($buffer, 0, 2) eq '>=') { }
5 8 elsif (substr($buffer, 0, 2) eq '<<') { }
5 3 elsif (substr($buffer, 0, 2) eq '>>') { }
1 2 elsif (substr($buffer, 0, 1) eq '>') { }
2 0 elsif (substr($buffer, 0, 1) eq '<') { }
392 82 0 if ($self->buffer =~ /^[\x23-\x3d\x3f-\x5a\x5d-\x7e]*>/ou)
400 0 0 if (length $self->buffer == 0)
402 0 0 unless defined $c
404 0 0 if (substr($self->buffer, 0, 1) eq '\\') { }
0 0 elsif ($self->buffer =~ /^[^<>\x00-\x20\\"{}|^`]+/ou) { }
0 0 elsif (substr($self->buffer, 0, 1) eq '>') { }
407 0 0 if ($esc eq '\\') { }
0 0 elsif ($esc eq 'U') { }
0 0 elsif ($esc eq 'u') { }
411 0 0 unless $codepoint =~ /^[0-9A-Fa-f]+$/ou
415 0 0 unless $codepoint =~ /^[0-9A-Fa-f]+$/ou
417 0 0 if ($char =~ /[<>" {}|\\^`]/ou)
460 0 1 if ($self->buffer =~ /^!=/u) { }
471 0 0 unless ($self->buffer =~ /^$r_BLANK_NODE_LABEL/ou)
481 1 17 if ($self->buffer =~ /^$r_DOUBLE/ou) { }
1 16 elsif ($self->buffer =~ /^$r_DECIMAL/ou) { }
16 0 elsif ($self->buffer =~ /^$r_INTEGER/ou) { }
493 1 19 if ($self->buffer =~ /^$r_NIL/u) { }
504 2 141 if (substr($self->buffer, 0, 2) eq '{|') { }
2 139 elsif (substr($self->buffer, 0, 2) eq '|}') { }
0 139 elsif (substr($self->buffer, 0, 2) eq '||') { }
70 69 elsif (substr($self->buffer, 0, 1) eq '{') { }
69 0 elsif (substr($self->buffer, 0, 1) eq '}') { }
527 0 0 if ($self->buffer =~ /^$r_ANON/u) { }
545 0 0 if (length $c and $c =~ /[\r\n]/ou)
554 2 0 if ($self->buffer =~ /^[a-zA-Z]+(-[a-zA-Z0-9]+)*\b/ou)
565 0 8 if (substr($self->buffer, 0, 2) eq '""') { }
572 0 0 if (length $self->buffer == 0)
574 0 0 if length $self->buffer == 0
576 0 0 if (substr($self->buffer, 0, 1) eq '"') { }
579 0 0 if $quote_count == 3
581 0 0 if ($quote_count)
585 0 0 if (substr($self->buffer, 0, 1) eq '\\') { }
598 1 15 if (substr($self->buffer, 0, 1) eq '\\') { }
7 8 elsif ($self->buffer =~ /^[^"\\]+/ou) { }
8 0 elsif (substr($self->buffer, 0, 1) eq '"') { }
617 1 3 if (substr($self->buffer, 0, 2) eq q['']) { }
624 0 4 if (length $self->buffer == 0)
626 0 0 if length $self->buffer == 0
628 3 1 if (substr($self->buffer, 0, 1) eq q[']) { }
631 1 2 if $quote_count == 3
633 0 1 if ($quote_count)
637 0 1 if (substr($self->buffer, 0, 1) eq '\\') { }
650 1 5 if (substr($self->buffer, 0, 1) eq '\\') { }
2 3 elsif ($self->buffer =~ /^[^'\\]+/ou) { }
3 0 elsif (substr($self->buffer, 0, 1) eq q[']) { }
671 0 2 if ($esc eq '\\') { }
2 0 elsif ($esc =~ /^['">]$/u) { }
0 0 elsif ($esc eq 'r') { }
0 0 elsif ($esc eq 't') { }
0 0 elsif ($esc eq 'n') { }
0 0 elsif ($esc eq 'b') { }
0 0 elsif ($esc eq 'f') { }
0 0 elsif ($esc eq 'U') { }
0 0 elsif ($esc eq 'u') { }
680 0 0 unless $codepoint =~ /^[0-9A-Fa-f]+$/ou
684 0 0 unless $codepoint =~ /^[0-9A-Fa-f]+$/ou