Branch Coverage

blib/lib/RDF/KV/Patch.pm
Criterion Covered Total %
branch 23 116 19.8


line true false branch
125 0 3 defined $_ && !ref($_) && $_ eq '' ? :
127 1 0 if (defined $s)
128 0 1 if (&Scalar::Util::blessed($s)) { }
129 0 0 if ($s->isa('RDF::Trine::Statement')) { }
0 0 elsif ($s->isa('URI::BNode')) { }
0 0 elsif ($s->isa('URI')) { }
0 0 elsif ($s->isa('RDF::Trine::Node::Variable')) { }
131 0 0 if (defined $p)
137 0 0 if ($s->isa('RDF::Trine::Statement::Quad')) { }
161 1 0 $s->scheme eq '_' ? :
166 1 0 if (defined $p)
167 0 1 if (&Scalar::Util::blessed($p)) { }
168 0 0 if ($p->isa('URI')) { }
0 0 elsif ($p->isa('RDF::Trine::Node::Variable')) { }
183 1 0 if (defined $o)
184 1 0 if (my $ref = ref $o) { }
185 1 0 if (&Scalar::Util::blessed($o)) { }
0 0 elsif ($ref eq 'ARRAY') { }
186 0 1 if ($o->isa('URI::BNode')) { }
0 1 elsif ($o->isa('URI')) { }
0 1 elsif ($o->isa('RDF::Trine::Node::Variable')) { }
201 0 0 if (ref $dt and &Scalar::Util::blessed($dt))
202 0 0 $dt->can('as_string') ? :
0 0 $dt->can('uri_value') ? :
216 0 1 if (defined $g)
217 0 0 if (&Scalar::Util::blessed($g)) { }
218 0 0 if ($g->isa('RDF::Trine::Node')) { }
0 0 elsif ($g->isa('URI')) { }
223 0 0 ($g->scheme || '') eq '_' ? :
234 0 0 ($g->scheme || '') eq '_' ? :
246 1 0 ref $_ ? :
1 1 $_->isa('RDF::Trine::Node::Blank') ? :
2 1 defined $_ ? :
253 1 0 if ($o) { }
254 1 0 if ($o->isa('RDF::Trine::Node::Literal')) { }
0 0 elsif ($o->isa('RDF::Trine::Node::Variable')) { }
257 0 0 $l ? :
1 0 $d ? :
265 0 0 $o->isa('RDF::Trine::Node::Blank') ? :
278 0 1 unless 3 == grep({ref $_;} $s, $p, $o)
280 0 1 $g ? :
313 0 0 unless 1 <= grep({ref $_;} $s, $p, $o)
315 0 0 $g ? :
367 0 0 unless ($use_graphs)
387 0 0 defined $_[3] ? :
392 0 0 wantarray ? :
406 0 0 defined $_[3] ? :
411 0 0 wantarray ? :
437 0 0 $x =~ /^_:(.*)/ ? :
0 0 $x eq '' ? :
451 0 0 if (not ref $gsp or $gsp->[0]{''}) { }
463 0 0 $t eq '@' ? :
0 0 $t ? :
491 0 0 defined $n[3] ? :
496 0 0 defined $_[3] ? :
512 0 0 if (ref $remove eq "CODE")
514 0 0 if $add
517 0 0 if &Scalar::Util::blessed($remove)