| 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)
|
|
554
|
0 |
0 |
unless $version
|
|
607
|
0 |
0 |
if defined $args{'copy_of'}
|
|
655
|
0 |
0 |
unless defined $args{'file'}
|
|
656
|
0 |
0 |
unless -e $args{'file'}
|
|
722
|
0 |
0 |
if defined $args{'compress'}
|
|
723
|
0 |
0 |
if defined $args{'format'}
|
|
770
|
0 |
0 |
if defined $self->password
|
|
814
|
0 |
0 |
unless defined $args{'file'}
|
|
815
|
0 |
0 |
unless -e $args{'file'}
|
|
818
|
0 |
0 |
if not defined $args{'format'} or $args{'format'} eq "p"
|
|
822
|
0 |
0 |
if defined $args{'format'}
|
|
824
|
0 |
0 |
if defined $self->connect_data->{'dbname'}
|
|
844
|
0 |
0 |
unless $self->dbname
|