line |
true |
false |
branch |
112
|
2 |
3 |
if (defined $arg{'dbi_dsn'}) |
116
|
0 |
2 |
if $scheme ne 'dbi' or $driver ne 'Pg' |
123
|
2 |
0 |
if exists $dsn_options{'dbname'} |
125
|
2 |
0 |
if exists $dsn_options{'host'} |
127
|
1 |
1 |
if exists $dsn_options{'port'} |
139
|
4 |
1 |
if (&any(sub {
$pg_settings_names{$_};
}
, keys %arg)) |
145
|
11 |
9 |
defined $arg{$arg_name} ? : |
157
|
0 |
1 |
ref $arg{'switches'} eq 'ARRAY' ? : |
|
1 |
4 |
if exists $arg{'switches'} |
159
|
0 |
5 |
if $arg{'debug'} or $ENV{'IN_DEBUG_MODE'} |
162
|
4 |
1 |
unless defined $command |
165
|
0 |
1 |
if (ref $command eq 'ARRAY') |
168
|
1 |
0 |
unless $command =~ /;\s*$/msx |
171
|
1 |
0 |
if (defined $output_filename) |
176
|
0 |
1 |
if defined $stderr_redirect |
179
|
1 |
0 |
if (defined $execution_path) |
180
|
0 |
1 |
if $debug |
191
|
1 |
0 |
if defined wantarray |