line |
true |
false |
branch |
52
|
2 |
0 |
if $name =~ /DESTROY$/ |
54
|
0 |
0 |
unless $name =~ /^[_A-Z][_A-Z0-9]*$/ |
56
|
0 |
0 |
$s && ref $s && $s->isa('Env::Bash') ? : |
115
|
0 |
1 |
if $s->{'options'}{'Keys'} |
129
|
0 |
0 |
unless ($s->{'keys'}) |
140
|
0 |
1 |
if (exists $s->{'keys'} and @{$s->{'keys'};}) |
141
|
0 |
0 |
unless defined wantarray |
142
|
0 |
0 |
wantarray ? : |
146
|
1 |
0 |
unless defined wantarray |
147
|
0 |
0 |
wantarray ? : |
161
|
4 |
0 |
unless (%options) |
162
|
3 |
1 |
unless defined wantarray |
163
|
1 |
0 |
wantarray ? : |
166
|
0 |
0 |
unless defined wantarray |
167
|
0 |
0 |
wantarray ? : |
210
|
0 |
1 |
unless $s->EXISTS($key) |
245
|
0 |
0 |
unless $prevkey |
247
|
0 |
0 |
if $s->{'keys'}[$idx] eq $prevkey |
259
|
0 |
3 |
unless defined wantarray |
262
|
0 |
3 |
unless $name |
270
|
0 |
3 |
if $options{'Debug'} |
275
|
0 |
0 |
$href->{$name} ? : |
276
|
0 |
0 |
if ($options{'ForceArray'}) |
277
|
0 |
0 |
wantarray ? : |
279
|
0 |
0 |
defined $ret[0] ? : |
|
0 |
0 |
wantarray ? : |
287
|
0 |
1 |
@sources ? : |
292
|
0 |
0 |
if (@sources and $options{'SourceOnly'}) |
300
|
0 |
1 |
unless defined wantarray |
301
|
1 |
0 |
wantarray ? : |
312
|
0 |
29 |
unless $name |
313
|
0 |
29 |
if $name eq 'BASH_EXECUTION_STRING' |
314
|
0 |
29 |
if ($options{'SelectRegex'}) |
315
|
0 |
0 |
unless $name =~ /$options{'SelectRegex'}/ |
325
|
0 |
0 |
if $bash and -f $bash and -x _ |
327
|
0 |
3 |
if $bash and -f $bash and -x _ |
329
|
0 |
0 |
if $bash and -f $bash and -x _ |
331
|
0 |
3 |
if $bash and -f $bash and -x _ |
333
|
3 |
0 |
if $bash and -f $bash and -x _ |
344
|
0 |
0 |
ref $options{'Source'} && ref $options{'Source'} eq 'ARRAY' ? : |
|
0 |
4 |
$options{'Source'} ? : |
345
|
4 |
0 |
unless @srcs |
348
|
0 |
0 |
unless $source |
350
|
0 |
0 |
unless $source |
351
|
0 |
0 |
unless (-f $source) |
355
|
0 |
0 |
unless (-x _) |
360
|
0 |
0 |
unless (open $fh, $source) |
384
|
0 |
4 |
if $options{'Debug'} |
386
|
3 |
1 |
if $? or $@ |
389
|
0 |
1 |
if $options{'Debug'} |
402
|
0 |
0 |
if $options{'Debug'} |
409
|
0 |
17 |
if ($_[0] and ref $_[0] and ref $_[0] eq 'ARRAY') { } |
414
|
17 |
0 |
unless (%options) |
415
|
0 |
17 |
unless defined wantarray |
416
|
17 |
0 |
wantarray ? : |
418
|
0 |
0 |
unless defined wantarray |
419
|
0 |
0 |
wantarray ? : |