| line |
true |
false |
branch |
|
17
|
0 |
1 |
if $RESTORE_READMODE
|
|
35
|
0 |
0 |
if ($self->{'port'}) { }
|
|
|
0 |
0 |
elsif ($self->{'path'}) { }
|
|
44
|
0 |
0 |
if (-S $self->{'path'})
|
|
45
|
0 |
0 |
unless unlink $self->{'path'}
|
|
51
|
0 |
0 |
if ($self->{'socket'} and defined $self->{'mode'})
|
|
53
|
0 |
0 |
unless chmod $self->{'mode'}, $self->{'path'}
|
|
55
|
0 |
0 |
if ($self->{'socket'})
|
|
57
|
0 |
0 |
unless $self->{'socket'}->listen(1)
|
|
61
|
0 |
0 |
unless $self->{'socket'}
|
|
79
|
0 |
0 |
if ($err and @$err)
|
|
84
|
0 |
0 |
if ($hnd == $client)
|
|
87
|
0 |
0 |
if ($hnd == \*STDIN)
|
|
93
|
0 |
0 |
unless defined $ok
|
|
94
|
0 |
0 |
if ($key eq "\cD")
|
|
109
|
0 |
0 |
unless defined $count
|
|
111
|
0 |
0 |
if not defined $written or $written != $count
|
|
117
|
0 |
0 |
if $self->{'socket'}
|