| line |
true |
false |
branch |
|
134
|
0 |
0 |
if exists $connkey_env{$_}
|
|
293
|
0 |
0 |
$ENV{$_} ? :
|
|
298
|
0 |
0 |
$args{'env'} ? :
|
|
314
|
0 |
0 |
if (defined($args{'errlog'} // $args{'stdout_log'}))
|
|
319
|
0 |
0 |
if ($exit_code != 0)
|
|
321
|
0 |
0 |
unless unlink $filename
|
|
325
|
0 |
0 |
if ($? == -1) { }
|
|
|
0 |
0 |
elsif ($? & 127) { }
|
|
345
|
0 |
0 |
if defined $args{'file'}
|
|
349
|
0 |
0 |
if (defined $args{'tempdir'})
|
|
351
|
0 |
0 |
unless -d $args{'tempdir'}
|
|
356
|
0 |
0 |
unless my $fh = "File::Temp"->new(%file_options)
|
|
369
|
0 |
0 |
if defined $args{'stdout_log'}
|
|
374
|
0 |
0 |
if defined $args{'errlog'}
|
|
383
|
0 |
0 |
unless open my $fh, ">>", $filename
|
|
386
|
0 |
0 |
unless print $fh $data // ""
|
|
389
|
0 |
0 |
unless close $fh
|
|
487
|
0 |
0 |
unless (@helpers)
|
|
526
|
0 |
0 |
unless my $dbh = "DBI"->connect("dbi:Pg:" . $connect, $self->connect_data->{'user'} // "", $self->connect_data->{'password'} // "", $options)
|
|
556
|
0 |
0 |
unless $version
|
|
609
|
0 |
0 |
if defined $args{'copy_of'}
|
|
672
|
0 |
0 |
unless defined $args{'file'}
|
|
673
|
0 |
0 |
unless -e $args{'file'}
|
|
679
|
0 |
0 |
defined $vars->{$_} ? :
|
|
743
|
0 |
0 |
if defined $args{'compress'}
|
|
744
|
0 |
0 |
if defined $args{'format'}
|
|
791
|
0 |
0 |
if defined $self->password
|
|
835
|
0 |
0 |
unless defined $args{'file'}
|
|
836
|
0 |
0 |
unless -e $args{'file'}
|
|
839
|
0 |
0 |
if not defined $args{'format'} or $args{'format'} eq "p"
|
|
843
|
0 |
0 |
if defined $args{'format'}
|
|
845
|
0 |
0 |
if defined $self->connect_data->{'dbname'}
|
|
865
|
0 |
0 |
unless $self->dbname
|
|
887
|
0 |
0 |
unless $self->dbname
|