| line |
true |
false |
branch |
|
66
|
0 |
0 |
unless $self->version_table =~ /^[a-zA-Z_]+$/ |
|
72
|
0 |
0 |
if (defined $version) { } |
|
95
|
0 |
0 |
if ($version) |
|
99
|
0 |
0 |
unless $self->version_table =~ /^[a-zA-Z_]+$/ |
|
110
|
0 |
0 |
unless $self->_dbh->do("INSERT INTO @{[$self->version_table];} (version) VALUES (?)", {}, $self->ddl_version) |
|
118
|
0 |
0 |
if ($self->check_version) |
|
126
|
0 |
0 |
$dsn0 =~ /:Pg:/ ? : |
|
|
0 |
0 |
$dsn0 =~ /:mysql:/ ? : |
|
133
|
0 |
0 |
unless $source->parser($db) |
|
134
|
0 |
0 |
unless $source->translate(\$source_sql) |
|
140
|
0 |
0 |
unless $target->parser($db) |
|
141
|
0 |
0 |
unless $target->translate(\$target_sql) |
|
160
|
0 |
0 |
unless $self->_dbh->do("UPDATE @{[$self->version_table];} SET version = ?", {}, $self->ddl_version) |
|
170
|
0 |
0 |
if (ref $self->dsn->[-1] eq 'HASH') |
|
174
|
0 |
0 |
unless my $dbh = 'DBI'->connect(@{$self->dsn;}) |
|
177
|
0 |
0 |
if ($on_connect_do) |
|
178
|
0 |
0 |
if (ref $on_connect_do eq 'ARRAY') { } |
|
183
|
0 |
0 |
unless $dbh->do($on_connect_do) |
|
205
|
0 |
0 |
unless $self->_dbh->do($statement) |
|
213
|
0 |
0 |
unless open my $fh, '<', $file |
|
229
|
0 |
0 |
unless open my $fh, '>', $outfile |