line |
true |
false |
branch |
36
|
0 |
1 |
if $ENV{'PSC_CONFIG_CMD'} |
45
|
0 |
0 |
if ($ENV{'PSC_CONFIG_FH'} >= 0) { } |
47
|
0 |
0 |
$type ? : |
48
|
0 |
0 |
unless open $fh, "$rw<&=$ENV{'PSC_CONFIG_FH'}" |
68
|
0 |
0 |
unless ($fh) |
75
|
0 |
0 |
if /^\s+\#/ |
77
|
0 |
0 |
if (/^\#\s*(?:([^:]+):)?/) { } |
|
0 |
0 |
elsif ((($k, $v) = split(/:\s*/, $_, 2)) == 2) { } |
80
|
0 |
0 |
if ($conf{$k}) { } |
81
|
0 |
0 |
if (ref $conf{$k}) { } |
96
|
0 |
0 |
wantarray ? : |
102
|
0 |
0 |
unless ($type) |
107
|
0 |
0 |
if (@_ == 1) { } |
108
|
0 |
0 |
if (ref $_[0] eq 'HASH') { } |
115
|
0 |
0 |
if (@_ % 2) |
135
|
0 |
0 |
if (ref $conf{$k}) { } |
150
|
0 |
1 |
if ($Config::Secure::OPENED) |
152
|
0 |
0 |
if $fh |