| line |
true |
false |
branch |
|
265
|
0 |
0 |
$_[0] ? :
|
|
277
|
0 |
5 |
defined $self->schema ? :
|
|
284
|
0 |
5 |
unless my(@dsn) = "DBI"->parse_dsn($_[0]->dsn)
|
|
309
|
0 |
5 |
unless $producer{$dbi_driver}
|
|
322
|
0 |
5 |
if $self->_has_dbh
|
|
332
|
5 |
0 |
if ($self->_dbi_driver eq "SQLite")
|
|
338
|
0 |
5 |
unless eval {
|
|
347
|
0 |
5 |
$self->_cached ? :
|
|
349
|
0 |
5 |
unless $self->_set__dbh("DBI"->$connect($self->dsn, $self->db_user, $self->db_pass, \%attr))
|
|
353
|
0 |
5 |
if $self->dbitrace
|
|
356
|
5 |
0 |
if ($self->drop_table or $self->create_table and not $self->_table_exists)
|
|
360
|
0 |
5 |
unless my $table = $schema->add_table("name", $self->_fq_table_name)
|
|
366
|
0 |
15 |
unless $table->add_field("name", $field_name, "data_type", $self->output_types->{$field_name})
|
|
370
|
0 |
5 |
if (@{$self->primary;})
|
|
371
|
0 |
0 |
unless $table->primary_key(@{$self->primary;})
|
|
382
|
0 |
5 |
unless my $sql = $tr->translate
|
|
387
|
0 |
5 |
if $@
|
|
390
|
4 |
1 |
if $self->batch
|
|
459
|
0 |
7 |
unless $self->_has_dbh
|
|
463
|
6 |
1 |
if (@{$queue;})
|
|
473
|
0 |
6 |
if ($error)
|
|
505
|
24 |
6 |
if ($self->batch) { }
|
|
508
|
3 |
21 |
if @{$self->queue;} == $self->batch
|
|
515
|
0 |
6 |
if $@
|
|
552
|
0 |
5 |
unless $self->_has_dbh
|
|
554
|
4 |
1 |
if $self->batch
|
|
576
|
0 |
5 |
if @{$self->queue;}
|
|
578
|
0 |
5 |
if $self->_has_dbh
|