| line |
true |
false |
branch |
|
13
|
0 |
0 |
unless $ENV{'OPTEX_ROOT'} |
|
18
|
0 |
0 |
unless -l $path |
|
19
|
0 |
0 |
if basename($path) eq "optex" |
|
37
|
0 |
0 |
if (defined $alias_val) |
|
42
|
0 |
0 |
if (defined $alias_cmd) |
|
43
|
0 |
0 |
if $DEBUG |
|
50
|
0 |
0 |
if (@real) { } |
|
51
|
0 |
0 |
if $DEBUG |
|
54
|
0 |
0 |
if $DEBUG |
|
59
|
0 |
0 |
if (-f $rc) |
|
60
|
0 |
0 |
if $DEBUG |
|
73
|
0 |
0 |
unless -x $cmd and not -d $cmd |
|
74
|
0 |
0 |
if detect_optex($cmd) |
|
91
|
0 |
0 |
if (not ref $val) { } |
|
|
0 |
0 |
elsif (ref $val eq 'ARRAY' and @$val) { } |
|
96
|
0 |
0 |
unless defined $cmd |
|
98
|
0 |
0 |
if $cmd =~ m[^(?:.*/)?(?:(?:ba)?sh|env|exec|expr)$]u |
|
104
|
0 |
0 |
if (not ref $val) { } |
|
|
0 |
0 |
elsif (ref $val eq 'ARRAY') { } |
|
116
|
0 |
0 |
unless -f $config |
|
121
|
0 |
0 |
unless open my $fh, "<", $config |
|
125
|
0 |
0 |
if $err |
|
128
|
0 |
0 |
if ($data) |
|
131
|
0 |
0 |
if $DEBUG and $@ |
|
140
|
0 |
0 |
unless open my $fh, "<", $config |
|
144
|
0 |
0 |
if (/^\[alias\]/u) |
|
148
|
0 |
0 |
if (/^\[/u) |
|
152
|
0 |
0 |
unless $in_alias |
|
154
|
0 |
0 |
if (/^\s*(\w[\w-]*)\s*=\s*"([^"]*)"/u) |