| line |
true |
false |
branch |
|
45
|
1 |
736 |
if (defined $params{'key'} and $params{'key'} =~ /^0x[0-9a-fA-F]+$/i) |
|
49
|
2 |
735 |
unless (defined $params{'key'} and $params{'key'} =~ /^\d+$/) |
|
65
|
10 |
724 |
unless (defined $id) |
|
68
|
10 |
0 |
if ($!) |
|
69
|
6 |
4 |
if ($!{'EEXIST'} or $!{'EPERM'}) |
|
86
|
731 |
12439 |
if (defined $id) |
|
87
|
1 |
730 |
if ($self->{'id'}) |
|
98
|
736 |
1503 |
if (defined $key) |
|
99
|
1 |
735 |
if ($self->id) |
|
111
|
735 |
575 |
if (defined $key_int) |
|
120
|
735 |
1751 |
if (defined $flags) |
|
121
|
1 |
734 |
if ($self->id) |
|
133
|
735 |
737 |
if (defined $mode) |
|
134
|
1 |
734 |
if ($self->id) |
|
147
|
736 |
6490 |
if (defined $size) |
|
148
|
1 |
735 |
if ($self->id) |
|
152
|
1 |
734 |
unless ($size =~ /^\d+$/) |
|
163
|
584 |
153 |
if (defined $type) |
|
164
|
1 |
583 |
if ($self->id) |
|
179
|
6 |
1718 |
unless defined $data |
|
182
|
1718 |
0 |
$pos >= 0 ? : |
|
189
|
1 |
24 |
unless shmctl $self->id, IPC_STAT(), $data |
|
193
|
24 |
0 |
if ($^O eq 'linux') { } |
|
|
0 |
0 |
elsif ($^O eq 'freebsd' and $IPC::Shareable::SharedMem::Config{'longsize'} == 8) { } |
|
|
0 |
0 |
elsif ($^O eq 'solaris') { } |
|
|
0 |
0 |
elsif ($^O eq 'openbsd' and $IPC::Shareable::SharedMem::Config{'longsize'} == 8) { } |
|
|
0 |
0 |
elsif ($^O eq 'dragonfly' and $IPC::Shareable::SharedMem::Config{'longsize'} == 8) { } |
|
194
|
24 |
0 |
if ($IPC::Shareable::SharedMem::Config{'longsize'} == 8) { } |
|
224
|
0 |
0 |
if ($IPC::Shareable::SharedMem::Config{'longsize'} == 8) { } |
|
271
|
0 |
0 |
if (length $data > 96) { } |
|
294
|
24 |
264 |
if ($_ eq 'mode') { } |
|
340
|
20 |
3742 |
unless CORE::shmread $self->id, $data, 0, $self->size |
|
351
|
543 |
1 |
if (defined $os_return_value and $os_return_value eq '0 but true' || $os_return_value == 1) { } |