| line |
true |
false |
branch |
|
90
|
0 |
0 |
if (not $prefix) { }
|
|
|
0 |
0 |
elsif (substr($prefix, 0, 1) =~ /[&A-Za-z_]/) { }
|
|
|
0 |
0 |
if (not $prefix) { }
|
|
|
0 |
0 |
elsif (substr($prefix, 0, 1) =~ /[&A-Za-z_]/) { }
|
|
91
|
0 |
0 |
if (0 == index($self->{'proc'}{'leading_str'}, 'eval?')) { }
|
|
|
0 |
0 |
if (0 == index($self->{'proc'}{'leading_str'}, 'eval?')) { }
|
|
113
|
0 |
0 |
if (1 == scalar @$args) { }
|
|
|
0 |
0 |
if (1 == scalar @$args) { }
|
|
114
|
0 |
0 |
if ($proc->{'terminated'})
|
|
|
0 |
0 |
if ($proc->{'terminated'})
|
|
122
|
0 |
0 |
if ('?' eq substr($cmd_name, -1)) { }
|
|
|
0 |
0 |
if ('?' eq substr($cmd_name, -1)) { }
|
|
142
|
0 |
0 |
unless $return_type
|
|
|
0 |
0 |
unless $return_type
|