| line |
true |
false |
branch |
|
52
|
0 |
2 |
ref $_[0] ? : |
|
55
|
0 |
2 |
unless $dsn |
|
56
|
2 |
0 |
if ($opt) { } |
|
58
|
12 |
8 |
unless exists $opt->{$_} |
|
67
|
0 |
2 |
if (UNIVERSAL::isa($dsn, 'DBI::db')) { } |
|
72
|
0 |
2 |
unless $dsn =~ /^dbi/ |
|
76
|
0 |
2 |
if $driver eq 'Oracle' |
|
88
|
0 |
2 |
unless $dbh |
|
101
|
2 |
0 |
if $haveStorable |
|
114
|
1 |
1 |
if (defined $sth and $sth->execute ne '') |
|
119
|
1 |
0 |
if $field_names{$opt->{'value'}} |
|
123
|
1 |
1 |
unless ($structure_ok) |
|
125
|
0 |
0 |
unless ($opt->{'create'} or $opt->{'drop'}) |
|
131
|
1 |
0 |
if $opt->{'drop'} |
|
134
|
0 |
1 |
$keyless ? : |
|
138
|
0 |
0 |
$keyless ? : |
|
|
0 |
1 |
if $canfreeze |
|
141
|
0 |
1 |
if $opt->{'DEBUG'} |
|
142
|
0 |
1 |
unless ($dbh->do($q)) |
|
168
|
0 |
8 |
if exists $self->{'cached_value'}{$key} |
|
171
|
0 |
8 |
$self->{'canfreeze'} ? : |
|
177
|
0 |
8 |
unless $result |
|
178
|
0 |
8 |
$self->{'canfreeze'} && $result->[1] ? : |
|
185
|
0 |
0 |
if (ref $value and $self->{'canfreeze'}) |
|
194
|
0 |
5 |
if ($self->{'brokenselect'}) |
|
195
|
0 |
0 |
$self->EXISTS($key) ? : |
|
208
|
0 |
1 |
if $sth->err |
|
218
|
0 |
1 |
if $dbh->err |
|
227
|
0 |
2 |
unless $sth |
|
238
|
2 |
2 |
if ($self->{'fetchkeys'}) |
|
243
|
0 |
4 |
$self->{'canfreeze'} ? : |
|
249
|
0 |
4 |
unless $sth->execute |
|
251
|
3 |
1 |
defined $ref ? : |
|
258
|
0 |
0 |
wantarray ? : |
|
|
0 |
8 |
unless my $sth = $self->{'fetchkeys'} |
|
260
|
3 |
5 |
unless ($r) |
|
263
|
0 |
3 |
wantarray ? : |
|
265
|
0 |
5 |
$r->[2] ? : |
|
267
|
0 |
5 |
wantarray ? : |
|
273
|
3 |
11 |
if $self->{$_} |
|
275
|
2 |
0 |
if $self->{'dbh'} |
|
290
|
0 |
5 |
if ($self->{'canfreeze'}) { } |
|
304
|
0 |
5 |
unless $sth |
|
311
|
0 |
4 |
if ($self->{'canfreeze'}) { } |
|
325
|
0 |
4 |
unless $sth and $sth->rows |
|
331
|
0 |
20 |
if ($self->{'canbind'}) |
|
333
|
0 |
0 |
unless $sth->execute(@bind_variables) |
|
340
|
0 |
20 |
unless $sth and $sth->execute |
|
346
|
0 |
5 |
if (exists $self->{$tag}) { } |
|
347
|
0 |
5 |
unless $q |
|
348
|
0 |
5 |
if $self->{'DEBUG'} |
|
350
|
0 |
5 |
unless $sth |
|
354
|
0 |
0 |
if $q |