| line |
true |
false |
branch |
|
134
|
0 |
0 |
if exists $connkey_env{$_}
|
|
291
|
0 |
0 |
$ENV{$_} ? :
|
|
296
|
0 |
0 |
$args{'env'} ? :
|
|
312
|
0 |
0 |
if (defined($args{'errlog'} // $args{'stdout_log'}))
|
|
317
|
0 |
0 |
if ($exit_code != 0)
|
|
319
|
0 |
0 |
unless unlink $filename
|
|
323
|
0 |
0 |
if ($? == -1) { }
|
|
|
0 |
0 |
elsif ($? & 127) { }
|
|
343
|
0 |
0 |
if defined $args{'file'}
|
|
347
|
0 |
0 |
if (defined $args{'tempdir'})
|
|
349
|
0 |
0 |
unless -d $args{'tempdir'}
|
|
354
|
0 |
0 |
unless my $fh = 'File::Temp'->new(%file_options)
|
|
367
|
0 |
0 |
if defined $args{'stdout_log'}
|
|
372
|
0 |
0 |
if defined $args{'errlog'}
|
|
381
|
0 |
0 |
unless open my $fh, '>>', $filename
|
|
384
|
0 |
0 |
unless print $fh $data // ''
|
|
387
|
0 |
0 |
unless close $fh
|
|
485
|
0 |
0 |
unless (@helpers)
|
|
524
|
0 |
0 |
unless my $dbh = 'DBI'->connect('dbi:Pg:' . $connect, $self->connect_data->{'user'} // '', $self->connect_data->{'password'} // '', $options)
|
|
548
|
0 |
0 |
unless my($retval) = $version =~ /(\d+\.\d+\.\d+)/
|
|
601
|
0 |
0 |
if defined $args{'copy_of'}
|
|
649
|
0 |
0 |
unless defined $args{'file'}
|
|
650
|
0 |
0 |
unless -e $args{'file'}
|
|
716
|
0 |
0 |
if defined $args{'compress'}
|
|
717
|
0 |
0 |
if defined $args{'format'}
|
|
764
|
0 |
0 |
if defined $self->password
|
|
808
|
0 |
0 |
unless defined $args{'file'}
|
|
809
|
0 |
0 |
unless -e $args{'file'}
|
|
812
|
0 |
0 |
if not defined $args{'format'} or $args{'format'} eq 'p'
|
|
816
|
0 |
0 |
if defined $args{'format'}
|
|
818
|
0 |
0 |
if defined $self->connect_data->{'dbname'}
|
|
838
|
0 |
0 |
unless $self->dbname
|