| blib/lib/DBIx/TempDB.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 53 | 103 | 51.4 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 36 | 2 | 0 | 0 | $ENV{'DBIX_TEMP_DB_KEEP_DATABASE'} and not $ENV{'DBIX_TEMP_DB_SILENT'} |
| 52 | 6 | 0 | 1 | not ref $self and $url |
| 53 | 1 | 0 | 0 | ref $url and $url->isa('URI::_db') |
| 237 | 6 | 0 | 0 | 63 < length $name and not $self->{'keep_too_long_database_name'} |
| 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 |