Branch Coverage

blib/lib/REST/Neo4p/Constraint.pm
Criterion Covered Total %
branch 35 50 70.0


line true false branch
64 1 33 unless (defined $tag)
67 1 32 unless ($tag =~ /^[a-z0-9_.]+$/i)
70 32 0 if (not grep(/^$tag$/, keys %$CONSTRAINT_TABLE)) { }
93 6 5 if $self->can('rtype')
96 10 1 if $old
103 11 0 unless (ref $json)
106 0 11 unless ($json->{'tag'} and $json->{'type'})
120 17 61 if (ref $_ eq 'HASH') { }
11 50 elsif (ref $_ eq 'ARRAY') { }
122 3 47 if ($v and $v =~ m[^qr/]) { }
123 0 3 if ($v =~ /\(\?(\^|-[a-z]+):.*\)/)
150 0 3 unless (&looks_like_number($priority_value))
158 1 3 if (ref $class)
167 0 0 if (ref $class)
180 0 1 if (ref $class)
206 0 20 unless defined $properties
211 0 20 unless (ref($properties) =~ /Neo4p::(Node|Relationship)$/ or ref $properties eq 'HASH')
216 0 20 ref($properties) =~ /Neo4p/ ? :
221 19 39 if ($_->validate($properties))
237 0 2 unless defined $from
238 0 2 unless (ref($reln) =~ /Neo4p::Relationship$/ or ref($from) =~ /Neo4p::Node|HASH$/ and ref($to) =~ /Neo4p::Node|HASH$/ and defined $reln_type)
247 1 3 if ($_->validate($from, $to, $reln_type, $reln_props))
262 0 11 unless defined $reln_type
267 10 1 if ($_->validate($reln_type))
285 0 1 if (my $e = 'Exception::Class'->caught)