Branch Coverage

blib/lib/Gwybodaeth/Parsers/N3.pm
Criterion Covered Total %
branch 40 54 74.0


line true false branch
61 0 4 unless ref $self
74 0 4 unless $self->_parse_triplestore($$self{'triples'})
94 0 28 if ($token =~ / # whole string matches @prefix ^\@prefix$/x)
101 0 28 if ($token =~ / # whole string matches @base ^\@base$/x)
109 3 25 if ($token =~ / # whole string matches: a ^a$/x)
117 0 25 if ($token =~ / # whole string matches only: = ^\=$/x)
124 0 25 if ($token =~ / # whole string matches only: <= ^\<\=$/x)
131 0 25 if ($token =~ / # whole string matches only: => ^\=\>$/x)
139 1 24 if ($token =~ /\< # open angle bracket \s* # any number of whitespace chars Ex: # .* # any number of any char except '\n' \> # close angle bracket /x)
145 0 1 if ($next_token =~ /[.;] # either a period or comma /x) { }
160 5 19 if ($token =~ /\[ # matches [ /x)
161 3 2 if ($token =~ / \[\] # matches [] /x)
179 2 17 if ($token =~ /\]/x)
184 3 14 if ($token =~ /^\.$/x)
189 4 10 if ($token =~ /^\;$/x)
218 3 0 if ($self->_next_token($data, $index) eq ';')
240 10 3 if (defined $object and defined $verb) { }
241 4 6 if ($object =~ /^[\;\]]$ # any string consisting of # one comma or right square # brace /x)
249 2 4 if (eval { do { $object->isa('Gwybodaeth::Triples') } })
258 1 3 if ($next_token eq ';') { }
3 0 elsif ($next_token eq '.' or $next_token eq ']') { }
272 3 10 unless (defined ${$data;}[$index])
276 2 8 if (${$data;}[$index] eq '[' and $self->_next_token($data, $index) eq 'a') { }
297 3 0 if ($next_token eq ';')
324 4 0 if (defined $$self{'functions'})
325 0 4 unless $self->_parse_functions($$self{'functions'})
352 0 1 if ($obj eq $fkey)