| line |
true |
false |
branch |
|
89
|
0 |
0 |
if (defined $retn and not $retn =~ /^[\$\@]/) { } |
|
120
|
0 |
0 |
if (defined $ref and ref $ref and $ref eq $g_break) { } |
|
134
|
0 |
0 |
unless defined $name |
|
136
|
0 |
0 |
unless defined $no_errors |
|
141
|
0 |
0 |
if ($name eq '0') { } |
|
|
0 |
0 |
elsif ($name =~ /^(\d+)$/) { } |
|
|
0 |
0 |
elsif ($name eq 'PWD') { } |
|
|
0 |
0 |
elsif ($name eq '*' and query_in_quotes()) { } |
|
150
|
0 |
0 |
unless ($no_errors) |
|
167
|
0 |
0 |
if (defined $retn and $g_ina_function) |
|
181
|
0 |
0 |
if (substr($g_special_vars{$name}, 0, 4) ne '$ENV') |
|
223
|
0 |
0 |
if ($g_ina_function < 0) |
|
243
|
0 |
0 |
if ($$value[2] == $g_ina_subshell) |
|
250
|
0 |
0 |
if ($g_ina_subshell < 0) |
|
266
|
0 |
0 |
unless (defined $type) |
|
274
|
0 |
0 |
if (exists $g_special_vars{$name} and $name ne 'IFS') |
|
278
|
0 |
0 |
if (exists $g_variables{$name}) { } |
|
|
0 |
0 |
elsif (exists $g_env_variables{$name}) { } |
|
280
|
0 |
0 |
if ($g_variables{$name}[0] <= $level and $g_variables{$name}[2] == $g_ina_subshell) { } |
|
323
|
0 |
0 |
if (exists $g_variables{$name}) |
|
325
|
0 |
0 |
if ($g_variables{$name}[0] <= $level) |
|
339
|
0 |
0 |
if (exists $g_variables{$name}) |
|
340
|
0 |
0 |
if ($g_variables{$name}[0] <= $level) |
|
357
|
0 |
0 |
if $$value[0] == $g_block_level |
|
362
|
0 |
0 |
if ($g_block_level < 0) |
|
392
|
0 |
0 |
if exists $g_user_functions{$name} |
|
409
|
0 |
0 |
if $g_indent < 80 |
|
410
|
0 |
0 |
if $g_indent > 0 |
|
417
|
0 |
0 |
if ($g_filename eq '-') { } |
|
421
|
0 |
0 |
unless open $g_outh, '>', $g_filename |
|
424
|
0 |
0 |
if defined $perms |
|
453
|
0 |
0 |
if ($g_rd_len) |
|
479
|
0 |
0 |
if (query_semi_colon) |
|
506
|
0 |
0 |
if ($g_out_buffer =~ /print/) |
|
513
|
0 |
0 |
if $g_out_buffer =~ /print/ |
|
529
|
0 |
0 |
if (defined $msg) { } |
|
544
|
0 |
0 |
unless (defined $msg) |
|
548
|
0 |
0 |
if (query_semi_colon) { } |
|
561
|
0 |
0 |
if (defined $g_ref_redirect) { } |
|
562
|
0 |
0 |
if $g_err_buffer |
|
563
|
0 |
0 |
if $g_pre_buffer |
|
569
|
0 |
0 |
if $g_err_buffer |
|
570
|
0 |
0 |
if $g_pre_buffer |
|
621
|
0 |
0 |
if (defined $$types[$i][0]) { } |
|
630
|
0 |
0 |
if (@$types != @$tokens) |