| line |
true |
false |
branch |
|
21
|
0 |
707 |
if (not defined $actual) { } |
|
|
31 |
676 |
elsif (ref $actual) { } |
|
24
|
0 |
31 |
if (UNIVERSAL::isa($actual, 'DWH_File::Aware')) |
|
27
|
2 |
29 |
if (UNIVERSAL::isa($actual, 'SCALAR')) { } |
|
|
16 |
13 |
elsif (UNIVERSAL::isa($actual, 'ARRAY')) { } |
|
|
13 |
0 |
elsif (UNIVERSAL::isa($actual, 'HASH')) { } |
|
28
|
1 |
1 |
unless $ty = tied $$actual |
|
31
|
14 |
2 |
unless $ty = tied @$actual |
|
34
|
13 |
0 |
unless $ty = tied %$actual |
|
37
|
3 |
28 |
if ($ty) { } |
|
38
|
3 |
0 |
if ($ty->isa('DWH_File::Tie')) { } |
|
39
|
1 |
2 |
if ($$ty{'kernel'} == $kernel) { } |
|
45
|
0 |
28 |
if (UNIVERSAL::isa($actual, 'DWH_File::Aware')) |
|
49
|
0 |
28 |
if (UNIVERSAL::isa($actual, 'DWH_File::Aware')) |
|
61
|
0 |
1475 |
if (not defined $stored) { } |
|
|
0 |
1475 |
elsif ($stored eq '%') { } |
|
|
294 |
1181 |
elsif (my $val = $kernel->activate_reference($stored)) { } |