| line |
true |
false |
branch |
|
50
|
1 |
3 |
$self->has_memory ? : |
|
72
|
1 |
3 |
$self->has_memory ? : |
|
76
|
1 |
3 |
if ($self->has_database) { } |
|
|
1 |
2 |
elsif ($self->has_schema) { } |
|
77
|
0 |
1 |
unless copy($self->database, $tempfile->filename) |
|
81
|
0 |
1 |
unless open my $schema, '<', $self->schema |
|
84
|
0 |
1 |
unless my $dbh = 'DBI'->connect("dbi:SQLite:dbname=$tempfile", '', '', {'RaiseError', 1, 'AutoCommit', 0}) |
|
89
|
1 |
17 |
if $line =~ /^\s*--/ |
|
90
|
3 |
14 |
if $line =~ /^\s*$/ |
|
94
|
3 |
11 |
if ($line =~ /;/) |
|
95
|
0 |
3 |
unless $dbh->do($sql) |
|
113
|
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 |