line |
true |
false |
branch |
37
|
1 |
52 |
if ref $class ne "" |
38
|
2 |
50 |
unless $source and ref $source eq "" |
39
|
42 |
8 |
if ($class eq 'Neo4j::Error') { } |
41
|
4 |
38 |
unless $class |
46
|
1 |
7 |
unless $class->can("source") |
47
|
1 |
6 |
if $class->source ne $source |
50
|
6 |
38 |
if ($info and ref $info eq '') { } |
|
2 |
36 |
elsif (ref $info ne 'HASH') { } |
56
|
2 |
40 |
if @extra |
74
|
2 |
10 |
unless $source and ref $source eq "" |
75
|
1 |
8 |
if ref $self eq "" and $self->can("source") and $self->source ne $source |
77
|
1 |
8 |
if ($related and ref $related eq '') { } |
|
2 |
6 |
elsif (ref $related ne 'HASH') { } |
84
|
6 |
1 |
ref $self eq '' ? : |
87
|
3 |
1 |
if ref $self eq "" |
100
|
32 |
29 |
if defined $str |
104
|
7 |
22 |
if $code and $message |
105
|
6 |
23 |
if $code and not $message |
106
|
1 |
28 |
if not $code and $message |
107
|
15 |
14 |
unless $str |