| blib/lib/Devel/REPL/Client/Select.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 1 | 28 | 3.5 |
| line | true | false | branch |
|---|---|---|---|
| 17 | 0 | 1 | if $RESTORE_READMODE |
| 34 | 0 | 0 | if ($self->{'port'}) { } |
| 0 | 0 | elsif ($self->{'path'}) { } | |
| 43 | 0 | 0 | if (-S $self->{'path'}) |
| 44 | 0 | 0 | unless unlink $self->{'path'} |
| 53 | 0 | 0 | unless $self->{'socket'} |
| 71 | 0 | 0 | if ($err and @$err) |
| 76 | 0 | 0 | if ($hnd == $client) |
| 79 | 0 | 0 | if ($hnd == \*STDIN) |
| 85 | 0 | 0 | unless defined $ok |
| 86 | 0 | 0 | if ($key eq "\cD") |
| 101 | 0 | 0 | unless defined $count |
| 103 | 0 | 0 | if not defined $written or $written != $count |
| 109 | 0 | 0 | if $self->{'socket'} |