| line |
l |
!l |
condition |
|
15
|
0 |
14 |
$ENV{'DBIX_TEMP_DB_DEBUG'} || 0 |
|
16
|
0 |
14 |
$ENV{'DBIX_TEMP_DB_KILL_SLEEP_INTERVAL'} || 2 |
|
17
|
0 |
14 |
$ENV{'DBIX_TEMP_DB_MAX_NUMBER_OF_TRIES'} || 20 |
|
18
|
14 |
0 |
eval {
do {
sysconf(4)
}
} || 1024 |
|
68
|
1 |
0 |
$self->can("_parse_@{[$self->url->canonical_engine];}") || sub {
$_[1];
}
|
|
92
|
9 |
0 |
shift() || '' |
|
97
|
9 |
0 |
$url->canonical_engine || '' |
|
103
|
1 |
8 |
$self->{'create_database_command'} ||= 'create database %d' |
|
104
|
1 |
8 |
$self->{'drop_database_command'} ||= 'drop database %d' |
|
105
|
2 |
7 |
$self->{'drop_from_child'} //= 1 |
|
107
|
2 |
7 |
$self->{'template'} ||= 'tmp_%U_%X_%H%i' |
|
112
|
7 |
2 |
$self->{'auto_create'} // 1 |
|
177
|
1 |
1 |
$opt{'AutoCommit'} //= 1 |
|
178
|
0 |
2 |
$opt{'AutoInactiveDestroy'} //= 1 |
|
179
|
0 |
2 |
$opt{'PrintError'} //= 0 |
|
180
|
0 |
2 |
$opt{'RaiseError'} //= 1 |
|
196
|
1 |
3 |
$opt{'AutoCommit'} //= 1 |
|
197
|
0 |
4 |
$opt{'AutoInactiveDestroy'} //= 1 |
|
198
|
0 |
4 |
$opt{'PrintError'} //= 0 |
|
199
|
0 |
4 |
$opt{'RaiseError'} //= 1 |
|
200
|
0 |
4 |
$opt{'mysql_enable_utf8'} //= 1 |
|
214
|
0 |
1 |
$opt{'AutoCommit'} //= 1 |
|
215
|
0 |
1 |
$opt{'AutoInactiveDestroy'} //= 1 |
|
216
|
0 |
1 |
$opt{'PrintError'} //= 0 |
|
217
|
0 |
1 |
$opt{'RaiseError'} //= 1 |
|
218
|
0 |
1 |
$opt{'sqlite_unicode'} //= 1 |
| line |
l |
!l&&r |
!l&&!r |
condition |
|
106
|
0 |
8 |
1 |
$self->{'schema_database'} ||= $SCHEMA_DATABASE{$url->canonical_engine} |
|
240
|
0 |
0 |
0 |
$self->{'template'} =~ s/\%T//g or $self->{'template'} =~ s/\%H//g |
|
|
0 |
0 |
0 |
$self->{'template'} =~ s/\%T//g or $self->{'template'} =~ s/\%H//g or $self->{'template'} =~ s/\%X//g |
|
243
|
0 |
0 |
0 |
not $ENV{'HARNESS_ACTIVE'} or $ENV{'HARNESS_VERBOSE'} |
|
255
|
3 |
1 |
0 |
(shift())->{'hostname'} ||= Sys::Hostname::hostname() |
|
311
|
0 |
0 |
0 |
fork // confess("Couldn't fork: $!") |
|
325
|
26 |
29 |
16 |
$sql =~ /^(\s+)/s or $sql =~ /^(\w+)/ |
|
|
5 |
0 |
11 |
$sql =~ /^--.*(?:\n|\z)/p or $sql =~ /^\#.*(?:\n|\z)/p |
|
|
5 |
0 |
11 |
$sql =~ /^--.*(?:\n|\z)/p or $sql =~ /^\#.*(?:\n|\z)/p or $sql =~ m[^/\*(?:[^\*]|\*[^/])*(?:\*/|\*\z|\z)]p |
|
|
0 |
0 |
11 |
$sql =~ /^--.*(?:\n|\z)/p or $sql =~ /^\#.*(?:\n|\z)/p or $sql =~ m[^/\*(?:[^\*]|\*[^/])*(?:\*/|\*\z|\z)]p or $sql =~ /^'(?:[^'\\]*|\\(?:.|\n)|'')*(?:'|\z)/p |
|
|
0 |
0 |
11 |
$sql =~ /^--.*(?:\n|\z)/p or $sql =~ /^\#.*(?:\n|\z)/p or $sql =~ m[^/\*(?:[^\*]|\*[^/])*(?:\*/|\*\z|\z)]p or $sql =~ /^'(?:[^'\\]*|\\(?:.|\n)|'')*(?:'|\z)/p or $sql =~ /^"(?:[^"\\]*|\\(?:.|\n)|"")*(?:"|\z)/p |
|
|
0 |
0 |
11 |
$sql =~ /^--.*(?:\n|\z)/p or $sql =~ /^\#.*(?:\n|\z)/p or $sql =~ m[^/\*(?:[^\*]|\*[^/])*(?:\*/|\*\z|\z)]p or $sql =~ /^'(?:[^'\\]*|\\(?:.|\n)|'')*(?:'|\z)/p or $sql =~ /^"(?:[^"\\]*|\\(?:.|\n)|"")*(?:"|\z)/p or $sql =~ /^`(?:[^`]*|``)*(?:`|\z)/p |
|
376
|
0 |
1 |
0 |
(shift())->{'tempdir'} ||= 'File::Spec'->tmpdir |