| line |
true |
false |
branch |
|
26
|
0 |
1 |
if $self->{'created'} |
|
29
|
0 |
0 |
$self->{'drop_from_child'} == 2 ? : |
|
|
1 |
0 |
!$self->{'drop_from_child'} ? : |
|
33
|
0 |
1 |
unless eval {
do {
$self->_create_database($name)
}
} |
|
37
|
1 |
0 |
unless $ENV{'DBIX_TEMP_DB_KEEP_DATABASE'} |
|
53
|
0 |
0 |
if $delete_self |
|
56
|
0 |
0 |
if $params->{'name'} |
|
57
|
0 |
0 |
if $delete_self eq 'only' |
|
60
|
0 |
0 |
$N > 20 ? : |
|
64
|
0 |
0 |
unless $delete_self eq 'include' or $self_db_name and $self_db_name ne $name |
|
65
|
0 |
0 |
unless eval {
do {
$self->_drop_database($name);
1
}
} |
|
68
|
0 |
0 |
if @err == $max |
|
75
|
0 |
5 |
unless (&blessed($self)) |
|
77
|
0 |
0 |
unless &blessed($url) |
|
81
|
0 |
5 |
unless $self->{'database_name'} |
|
82
|
0 |
5 |
if $self->url->canonical_engine eq 'sqlite' and not -e $self->{'database_name'} |
|
89
|
0 |
0 |
if $self->url->canonical_engine eq 'sqlite' |
|
97
|
1 |
0 |
unless ('File::Spec'->file_name_is_absolute($path)) |
|
102
|
0 |
1 |
unless open my $SQL, '<', $path |
|
105
|
0 |
1 |
unless defined $ret |
|
120
|
1 |
6 |
if $self->{'auto_create'} // 1 |
|
129
|
1 |
0 |
if ($self->url->canonical_engine eq 'sqlite') { } |
|
132
|
0 |
1 |
unless 'IO::File'->new->open($name, 194) |
|
144
|
1 |
0 |
if ($self->url->canonical_engine eq 'sqlite') |
|
147
|
1 |
0 |
if -e $name |
|
148
|
0 |
1 |
if $! and $! != 2 |
|
168
|
2 |
2 |
$n > 0 ? : |
|
|
4 |
0 |
$1 eq 'X' ? : |
|
|
4 |
4 |
$1 eq 'U' ? : |
|
|
2 |
8 |
$1 eq 'T' ? : |
|
|
2 |
10 |
$1 eq 'P' ? : |
|
|
4 |
12 |
$1 eq 'H' ? : |
|
|
4 |
16 |
$1 eq 'i' ? : |
|
177
|
0 |
6 |
if (63 < length $name and not $self->{'keep_too_long_database_name'}) |
|
181
|
0 |
0 |
unless $self->{'template'} =~ s/\%T//g or $self->{'template'} =~ s/\%H//g or $self->{'template'} =~ s/\%X//g |
|
189
|
5 |
1 |
if $self->url->canonical_engine ne 'sqlite' |