| 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 ? : |