line |
true |
false |
branch |
20
|
0 |
0 |
if $drh |
62
|
0 |
0 |
unless defined $value |
64
|
0 |
0 |
unless $key =~ /^$DBD::Neo4p::prefix_/ |
73
|
0 |
0 |
if (my $ssl_opts = delete $rhAttr->{'SSL_OPTS'}) |
74
|
0 |
0 |
if ('REST::Neo4p'->agent->isa('LWP::UserAgent')) |
83
|
0 |
0 |
if ($db) |
86
|
0 |
0 |
unless $host and $port |
95
|
0 |
0 |
if (my $e = 'Exception::Class'->caught) |
97
|
0 |
0 |
ref $e ? : |
126
|
0 |
0 |
unless $sth |
131
|
0 |
0 |
$_ ? : |
142
|
0 |
0 |
unless ($dbh->{'AutoCommit'}) |
149
|
0 |
0 |
if (my $e = 'REST::Neo4p::VersionMismatchException'->caught) { } |
|
0 |
0 |
elsif ($e = 'Exception::Class'->caught) { } |
150
|
0 |
0 |
if $dbh->FETCH('Warn') |
155
|
0 |
0 |
ref $e ? : |
164
|
0 |
0 |
if ($dbh->FETCH('AutoCommit')) { } |
165
|
0 |
0 |
if $dbh->FETCH('Warn') |
174
|
0 |
0 |
if (my $e = 'REST::Neo4p::VersionMismatchException'->caught) { } |
|
0 |
0 |
elsif ($e = 'Exception::Class'->caught) { } |
175
|
0 |
0 |
if $dbh->FETCH('Warn') |
180
|
0 |
0 |
ref $e ? : |
189
|
0 |
0 |
if ($dbh->FETCH('AutoCommit')) { } |
190
|
0 |
0 |
if $dbh->FETCH('Warn') |
199
|
0 |
0 |
if (my $e = 'REST::Neo4p::VersionMismatchException'->caught) { } |
|
0 |
0 |
elsif ($e = 'Exception::Class'->caught) { } |
200
|
0 |
0 |
if $dbh->FETCH('Warn') |
205
|
0 |
0 |
ref $e ? : |
214
|
0 |
0 |
$dbh->neo_neo4j_version =~ /^[3-9]\.0/ ? : |
216
|
0 |
0 |
unless my $sth = $dbh->prepare($s) |
217
|
0 |
0 |
unless $sth->execute |
238
|
0 |
0 |
unless $raTables |
241
|
0 |
0 |
unless ($dbh2) |
243
|
0 |
0 |
unless ($dbh2) |
252
|
0 |
0 |
unless ($sth) |
288
|
0 |
0 |
if (not !$sValue) { } |
293
|
0 |
0 |
if 'REST::Neo4p'->_clear_autocommit |
320
|
0 |
0 |
if $param > $sth->FETCH('NUM_OF_PARAMS') |
329
|
0 |
0 |
if $sth->{'Active'} |
331
|
0 |
0 |
@bind_values ? : |
332
|
0 |
0 |
unless (@$params == $sth->FETCH('NUM_OF_PARAMS')) |
341
|
0 |
0 |
unless ($sth->{'Database'}->FETCH('AutoCommit')) |
342
|
0 |
0 |
unless ('REST::Neo4p'->_transaction) |
355
|
0 |
0 |
if ($q->err) |
366
|
0 |
0 |
$q ? : |
375
|
0 |
0 |
unless ($q) |
382
|
0 |
0 |
if (my $e = 'Exception::Class'->caught) |
384
|
0 |
0 |
ref $e ? : |
386
|
0 |
0 |
if ($q->err) |
391
|
0 |
0 |
unless ($row) |
407
|
0 |
0 |
ref $key_field ? : |
411
|
0 |
0 |
unless (grep /^$qkey$/, @names) |
418
|
0 |
0 |
unless $rows |
435
|
0 |
0 |
unless $key_from_data |
446
|
0 |
0 |
if grep /^$qn$/, @keys |
461
|
0 |
0 |
if defined $$sth{"$DBD::Neo4p::prefix_query_obj"} |