| line |
true |
false |
branch |
|
180
|
27 |
0 |
if (not defined $data) { } |
|
|
0 |
0 |
elsif (ref $data ne 'ARRAY') { } |
|
194
|
2 |
25 |
if $sym eq 'LEXICAL' |
|
198
|
5 |
0 |
$type eq 'SCALAR' ? : |
|
|
1 |
5 |
$type eq 'ARRAY' ? : |
|
|
19 |
6 |
$type eq 'HASH' ? : |
|
215
|
0 |
27 |
unless my $rv = ref $ref |
|
218
|
0 |
27 |
if ($rv eq 'CODE') |
|
222
|
0 |
27 |
if ($rv eq 'HANDLE') |
|
226
|
19 |
8 |
if $rv eq 'HASH' |
|
227
|
1 |
7 |
if $rv eq 'ARRAY' |
|
228
|
7 |
0 |
if $rv eq 'SCALAR' |
|
245
|
2 |
25 |
$sym eq 'LEXICAL' ? : |
|
|
0 |
27 |
unless my $segment = $sym eq 'LEXICAL' ? 'IPC::Shm::Segment'->anonymous : 'IPC::Shm::Segment'->named($sym) |
|
250
|
19 |
8 |
if ($type eq 'HASH') { } |
|
|
1 |
7 |
elsif ($type eq 'ARRAY') { } |
|
|
7 |
0 |
elsif ($type eq 'SCALAR') { } |
|
264
|
6 |
21 |
if ($sym eq '%IPC::Shm::NAMEVARS') |
|
265
|
2 |
4 |
unless ($IPC::Shm::NAMEVARS{$sym}) |
|
307
|
2 |
5 |
if $vname eq '%IPC::Shm::NAMEVARS' |