| line |
true |
false |
branch |
|
201
|
0 |
0 |
if ($variable and $$variable{'binding'}) { } |
|
202
|
0 |
0 |
if $out_flag and $$variable{'binding'} eq 'in' |
|
205
|
0 |
0 |
unless $variable |
|
207
|
0 |
0 |
$out_flag ? : |
|
227
|
0 |
0 |
if ($$variable{'binding'} eq 'in') { } |
|
|
0 |
0 |
elsif ($$variable{'binding'} eq 'out') { } |
|
261
|
0 |
0 |
if ($self->name =~ /\s+/) { } |
|
278
|
0 |
0 |
$result ? : |
|
343
|
0 |
0 |
$$variable{'type'} && $$variable{'type'} =~ /CHAR/ ? : |
|
388
|
0 |
0 |
unless my $routine_definition = $$record{'routine_definition'} |
|
392
|
0 |
0 |
if ($block_source ne $routine_definition) |