| blib/lib/DBGp/Client/Stream.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 0 | 10 | 0.0 |
| line | true | false | branch |
|---|---|---|---|
| 23 | 0 | 0 | if read($self->{'socket'}, $$buffer, 2, length $$buffer) == 0 |
| 31 | 0 | 0 | if (length $$buffer < $len + 1) |
| 33 | 0 | 0 | if read($self->{'socket'}, $$buffer, $len + 1 - length($$buffer), length $$buffer) == 0 |
| 36 | 0 | 0 | if length $$buffer < $len + 1 |
| 38 | 0 | 0 | unless substr($$buffer, $len, 1, '') eq "\000" |