| line |
true |
false |
branch |
|
45
|
1 |
664 |
if (defined $params{'key'} and $params{'key'} =~ /^0x[0-9a-fA-F]+$/i) |
|
49
|
2 |
663 |
unless (defined $params{'key'} and $params{'key'} =~ /^\d+$/) |
|
65
|
10 |
652 |
unless (defined $id) |
|
68
|
10 |
0 |
if ($!) |
|
69
|
6 |
4 |
if ($!{'EEXIST'} or $!{'EPERM'}) |
|
86
|
653 |
11110 |
if (defined $id) |
|
87
|
1 |
652 |
if ($self->{'id'}) |
|
98
|
664 |
1359 |
if (defined $key) |
|
99
|
1 |
663 |
if ($self->id) |
|
111
|
663 |
533 |
if (defined $key_int) |
|
120
|
663 |
1590 |
if (defined $flags) |
|
121
|
1 |
662 |
if ($self->id) |
|
133
|
663 |
665 |
if (defined $mode) |
|
134
|
1 |
662 |
if ($self->id) |
|
147
|
664 |
5655 |
if (defined $size) |
|
148
|
1 |
663 |
if ($self->id) |
|
152
|
1 |
662 |
unless ($size =~ /^\d+$/) |
|
163
|
537 |
128 |
if (defined $type) |
|
164
|
1 |
536 |
if ($self->id) |
|
179
|
6 |
1633 |
unless defined $data |
|
182
|
1633 |
0 |
$pos >= 0 ? : |
|
189
|
1 |
18 |
unless shmctl $self->id, IPC_STAT(), $data |
|
193
|
18 |
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
|
18 |
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
|
18 |
198 |
if ($_ eq 'mode') { } |
|
340
|
13 |
3113 |
unless CORE::shmread $self->id, $data, 0, $self->size |
|
351
|
476 |
1 |
if (defined $os_return_value and $os_return_value eq '0 but true' || $os_return_value == 1) { } |