Branch Coverage

blib/lib/DBD/Multiplex.pm
Criterion Covered Total %
branch 0 114 0.0


line true false branch
34 0 0 if $DBD::Multiplex::drh
69 0 0 if ($method eq 'do' or $method eq 'disconnect')
84 0 0 if $modes{$method}
93 0 0 if defined $$return_result[0]
97 0 0 unless wantarray
102 0 0 if ($method eq 'fetchrow_array')
108 0 0 if defined $$_[0]
138 0 0 defined $_ ? :
154 0 0 if ($$parent_handle{'mx_master_id'} and &mx_is_modify_statement(\$statement) || !$$parent_handle{'AutoCommit'}) { }
162 0 0 if $_ eq $$parent_handle{'mx_master_id'}
167 0 0 if ($statement)
172 0 0 $wantarray ? :
176 0 0 if ($child_err = $child_handle->err)
179 0 0 if ($parent_handle)
182 0 0 if ($error_proc)
191 0 0 if ($statement)
196 0 0 $wantarray ? :
200 0 0 if ($child_err = $child_handle->err) { }
203 0 0 if ($parent_handle)
206 0 0 if ($error_proc)
209 0 0 if $exit_mode eq 'first_error'
211 0 0 if $exit_mode eq 'first_success'
235 0 0 unless ($$statement)
236 0 0 if ($$statement =~ /^\s*INSERT\s|^\s*UPDATE\s|^\s*DELETE\s|^\s*CREATE\s|^\s*DROP\s/i)
237 0 0 if ($$statement =~ /^\s*SELECT(.*?)INTO\s/i)
238 0 0 if ($$statement =~ /^\s*SELECT(.*?)NEXTVAL|SETVAL\s/i)
283 0 0 if defined $dsn
292 0 0 if (defined $dsn_attr and $dsn_attr =~ /;?mx_connect_mode=(\w+);?/i)
294 0 0 unless &mx_valid_mx_connect_mode($dsn_attr_mx_connect_mode)
296 0 0 if (defined $dsn_attr and $dsn_attr =~ /;?mx_exit_mode=(\w+);?/i)
298 0 0 unless &mx_valid_mx_exit_mode($dsn_attr_exit_mode)
302 0 0 unless &mx_valid_mx_connect_mode($$attr{'mx_connect_mode'})
303 0 0 unless &mx_valid_mx_exit_mode($$attr{'mx_exit_mode'})
304 0 0 unless ref $$attr{'mx_error_proc'}
323 0 0 if ($exit_mode eq 'first_success_random') { }
338 0 0 if ($dsn =~ /;?mx_id=(\w+);?/i)
346 0 0 if ($connect_mode eq 'ignore_errors' and $stored_print_error)
351 0 0 if ($dbh) { }
358 0 0 if ($$attr{'mx_master_id'} and $$attr{'mx_master_id'} eq $mx_id) { }
0 0 elsif ($connect_mode eq 'ignore_errors') { }
364 0 0 if ($error_proc)
483 0 0 if ($parent_exit_mode) { }
497 0 0 if @$errors
527 0 0 if ($attr =~ /^mx_(.+)/)
528 0 0 if ($1 eq uc $1) { }
548 0 0 if ($attr =~ /^mx_(.+)/)
549 0 0 if ($1 eq uc $1) { }
590 0 0 wantarray ? :
594 0 0 unless wantarray
611 0 0 unless (&DBD::Multiplex::mx_is_modify_statement($statement))
635 0 0 if ($attr =~ /^mx_(.+)/)
636 0 0 if ($1 eq uc $1) { }
637 0 0 if $1 eq uc $1
656 0 0 if ($attr =~ /^mx_(.+)/)
657 0 0 if ($1 eq uc $1) { }
693 0 0 wantarray ? :
697 0 0 unless wantarray