line |
true |
false |
branch |
67
|
0 |
0 |
unless exists $db_driver{$db} |
71
|
0 |
0 |
if ($Class::DBI::Loader::VERSION < 0.07) |
76
|
0 |
0 |
if ($@ or not $cls->Flag('CDBI_Loader')) { } |
86
|
0 |
0 |
if ($@ or not $cls->Flag('CDBI_Loader')) { } |
104
|
0 |
0 |
if $cls->Var('db') eq 'postgres' |
115
|
0 |
0 |
unless my $loader = 'Class::DBI::Loader'->new('dsn', $db_driver{$arg{'db'}} . $arg{'dbname'}, 'user', $arg{'user'}, 'password', $arg{'pwd'}, 'options', $arg{'set_db_opts'}, 'constraint', "^$arg{'table'}\$", 'namespace', ucfirst $arg{'db'}) |
144
|
0 |
0 |
unless $_[0]->Var('db_default')->{$_[0]->Var('db')}{'regex'} |
159
|
0 |
0 |
if (exists $arg{'columns'}) { } |
|
0 |
0 |
elsif ($cls->Flag('get_columns')) { } |
165
|
0 |
0 |
if ($table_class->can($method)) { } |
|
0 |
0 |
elsif (my(@columns) = map({$_->name;} $table_class->columns('All') > 0)) { } |
193
|
0 |
0 |
$class->pg_version >= 7.3 ? : |
202
|
0 |
0 |
if $$col[0] =~ /^\.+pg\.dropped\.\d+\.+$/ |
230
|
0 |
0 |
if $$hash{'key'} eq 'PRI' |