| line |
true |
false |
branch |
|
49
|
1 |
3 |
$self->has_memory ? : |
|
71
|
1 |
3 |
$self->has_memory ? : |
|
75
|
1 |
3 |
if ($self->has_database) { } |
|
|
1 |
2 |
elsif ($self->has_schema) { } |
|
76
|
0 |
1 |
unless copy($self->database, $tempfile->filename) |
|
80
|
0 |
1 |
unless open my $schema, "<", $self->schema |
|
83
|
0 |
1 |
unless my $dbh = "DBI"->connect("dbi:SQLite:dbname=$tempfile", "", "", {"RaiseError", 1, "AutoCommit", 0}) |
|
88
|
1 |
17 |
if $line =~ /^\s*--/ |
|
89
|
3 |
14 |
if $line =~ /^\s*$/ |
|
93
|
3 |
11 |
if ($line =~ /;/) |
|
94
|
0 |
3 |
unless $dbh->do($sql) |
|
112
|
3 |
4 |
if $self->has_database and $self->has_schema or $self->has_database and $self->has_memory or $self->has_schema and $self->has_memory |