| line |
true |
false |
branch |
|
45
|
1 |
734 |
if (defined $params{'key'} and $params{'key'} =~ /^0x[0-9a-fA-F]+$/i) |
|
49
|
2 |
733 |
unless (defined $params{'key'} and $params{'key'} =~ /^\d+$/) |
|
65
|
10 |
722 |
unless (defined $id) |
|
68
|
10 |
0 |
if ($!) |
|
69
|
6 |
4 |
if ($!{'EEXIST'} or $!{'EPERM'}) |
|
86
|
728 |
12401 |
if (defined $id) |
|
87
|
1 |
727 |
if ($self->{'id'}) |
|
98
|
734 |
1499 |
if (defined $key) |
|
99
|
1 |
733 |
if ($self->id) |
|
111
|
733 |
574 |
if (defined $key_int) |
|
120
|
733 |
1745 |
if (defined $flags) |
|
121
|
1 |
732 |
if ($self->id) |
|
133
|
733 |
735 |
if (defined $mode) |
|
134
|
1 |
732 |
if ($self->id) |
|
147
|
734 |
6468 |
if (defined $size) |
|
148
|
1 |
733 |
if ($self->id) |
|
152
|
1 |
732 |
unless ($size =~ /^\d+$/) |
|
163
|
582 |
153 |
if (defined $type) |
|
164
|
1 |
581 |
if ($self->id) |
|
179
|
6 |
1716 |
unless defined $data |
|
182
|
1716 |
0 |
$pos >= 0 ? : |
|
189
|
1 |
23 |
unless shmctl $self->id, IPC_STAT(), $data |
|
193
|
23 |
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
|
23 |
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
|
23 |
253 |
if ($_ eq 'mode') { } |
|
340
|
20 |
3728 |
unless CORE::shmread $self->id, $data, 0, $self->size |
|
351
|
542 |
1 |
if (defined $os_return_value and $os_return_value eq '0 but true' || $os_return_value == 1) { } |