| line |
true |
false |
branch |
|
80
|
5 |
5 |
if ($ix >= 0) { } |
|
81
|
5 |
0 |
if $ix < $sun_path_len |
|
86
|
5 |
0 |
if ($ix < $sun_path_len) { } |
|
100
|
0 |
5 |
if @args == 1 |
|
110
|
0 |
0 |
if ($nul >= 0) |
|
114
|
0 |
0 |
wantarray ? : |
|
123
|
124 |
18 |
if ref $this |
|
125
|
0 |
18 |
if defined $newval |
|
147
|
1 |
4 |
if ref $class |
|
148
|
5 |
0 |
defined $self ? : |
|
151
|
5 |
0 |
if ($self) |
|
153
|
4 |
1 |
if (%Keys) { } |
|
157
|
1 |
0 |
if @Keys |
|
169
|
2 |
3 |
if ($class eq 'Net::UNIX') |
|
170
|
0 |
2 |
unless ($self->init(@Args)) |
|
177
|
0 |
5 |
if ($debug) |
|
178
|
0 |
0 |
if ($self) { } |
|
193
|
0 |
3 |
unless (defined $path) |
|
201
|
0 |
3 |
if (not $ix) { } |
|
217
|
0 |
2 |
unless (defined $path) |
|
225
|
0 |
2 |
if (not $ix) { } |
|
239
|
4 |
1 |
if (@args == 1 or @args == 2) |
|
241
|
2 |
2 |
unless $parms and ref $parms eq 'HASH' |
|
244
|
1 |
3 |
if defined $path and ref $path |
|
247
|
0 |
5 |
if @args == 2 and not $parms or @args > 2 or not $what |
|
250
|
3 |
2 |
if defined $path |
|
251
|
0 |
5 |
unless $self->SUPER::init($parms) |
|
252
|
4 |
1 |
if (scalar %$parms) |
|
253
|
0 |
4 |
unless $self->setparams($parms) |
|
255
|
3 |
2 |
if $self->getparam('type') == 2 |
|
257
|
3 |
2 |
if ($self->getparams(['srcaddr', 'srcaddrlist', 'dstaddr', 'dstaddrlist'], 1) > 0) |
|
258
|
0 |
3 |
unless $self->isopen or $self->open |
|
259
|
2 |
1 |
if ($self->getparams(['srcaddr', 'srcaddrlist'], 1) > 0) |
|
260
|
0 |
2 |
unless $self->isbound or $self->bind |
|
262
|
1 |
2 |
if ($self->getparams(['dstaddr', 'dstaddrlist'], 1) > 0) |
|
263
|
0 |
0 |
unless $self->isconnected or $self->connect or $self->isconnecting and not $self->blocking |
|
281
|
0 |
1 |
if (@_ > 3 or @_ == 3 and !ref($parms) || ref $path) |
|
284
|
0 |
2 |
if (@_ == 2 and ref $path) { } |
|
291
|
1 |
1 |
if (defined $path) |
|
294
|
1 |
1 |
if (@_ > 1) |
|
295
|
0 |
1 |
unless $self->setparams($parms) |
|
305
|
0 |
0 |
if ($fam == 1) { } |
|
646
|
0 |
0 |
if (@_ > 3 or @_ == 3 and !ref($parms) || ref $path) |
|
650
|
0 |
2 |
if (@_ == 2 and ref $path) { } |
|
657
|
0 |
2 |
if (defined $path) |
|
660
|
0 |
2 |
if (@_ > 1) |
|
661
|
0 |
0 |
unless $self->setparams($parms) |