| blib/lib/Ace/SocketServer.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 4 | 22 | 18.1 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 58 | 0 | 0 | 0 | defined $msg and $msg ne 'ACESERV_MSGKILL' |
| 187 | 0 | 0 | 0 | defined $strip_null and $strip_null |
| line | l | !l | condition |
|---|---|---|---|
| 37 | 0 | 4 | $user ||= 'anonymous' |
| 38 | 0 | 4 | $pass ||= 'guest' |
| 39 | 4 | 0 | $timeout ||= 120 |
| 40 | 0 | 4 | 'IO::Socket::INET'->new("${host}:$port") || (return _error(q[Couldn't establish connection])) |
| 84 | 0 | 0 | $self->_do_encore or return |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 97 | 0 | 0 | 0 | $msg eq 'ACESERV_MSGOK' or $msg eq 'ACESERV_MSGFAIL' |
| 181 | 0 | 0 | 0 | $$self{'client_id'} ||= $clientID |