line |
true |
false |
branch |
37
|
5 |
0 |
if (exists $args{'server'}) |
41
|
30 |
0 |
if not exists $$server{'user'} and exists $args{'user'} |
44
|
30 |
0 |
if not exists $$server{'password'} and exists $args{'password'} |
47
|
0 |
30 |
if not exists $$server{'write_timeout'} and exists $args{'write_timeout'} |
50
|
0 |
30 |
if not exists $$server{'read_timeout'} and exists $args{'read_timeout'} |
52
|
10 |
20 |
unless exists $$server{'id'} |
53
|
0 |
30 |
unless exists $$server{'type'} |
54
|
30 |
0 |
unless exists $$server{'weight'} |
55
|
30 |
0 |
unless exists $$server{'write_timeout'} |
56
|
30 |
0 |
unless exists $$server{'read_timeout'} |
59
|
15 |
15 |
if ($$server{'type'} eq 'slave') { } |
75
|
15 |
0 |
if @master |
87
|
0 |
0 |
unless my $counter = $dbh->do($sql, undef, @_) |
89
|
0 |
0 |
wantarray ? : |
94
|
0 |
1 |
ref $_[-1] eq 'CODE' ? : |
102
|
0 |
1 |
if (defined $async and defined $slave) { } |
|
1 |
0 |
elsif (defined $async) { } |
|
0 |
0 |
elsif (defined $slave) { } |
104
|
0 |
0 |
if ref $dbh ne 'DBI::db' |
109
|
0 |
0 |
if (ref $dbh ne 'DBI::db') |
112
|
0 |
0 |
if ref $dbh ne 'DBI::db' |
117
|
0 |
0 |
if ref $dbh ne 'DBI::db' |
121
|
0 |
0 |
if (ref $dbh ne 'DBI::db') |
124
|
0 |
0 |
if ref $dbh ne 'DBI::db' |
127
|
0 |
0 |
if (defined $async) { } |
128
|
0 |
0 |
unless my $sth = $dbh->prepare($query, {'async', 1}) |
129
|
0 |
0 |
unless $sth->execute(@_) |
133
|
0 |
0 |
unless my $sth = $dbh->prepare($query) |
134
|
0 |
0 |
unless my $counter = $sth->execute(@_) |
136
|
0 |
0 |
wantarray ? : |