lib/RPC/Switch/Client/Tiny/Netstring.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 13 | 32 | 40.6 |
line | true | false | branch |
---|---|---|---|
20 | 4812 | 0 | if (defined $i) { } |
0 | 0 | elsif ($!{'EINTR'}) { } | |
21 | 0 | 4812 | if ($i == 0) { } |
29 | 0 | 0 | $n ? : |
44 | 0 | 0 | if (defined $i) { } |
0 | 0 | elsif ($!{'EINTR'}) { } | |
49 | 0 | 0 | $n ? : |
82 | 2694 | 1059 | if ($c ne ':') { } |
83 | 0 | 2694 | unless $c =~ /\d+/ |
86 | 0 | 1059 | if $n eq "" |
91 | 1059 | 115 | if ($res and $res = sysreadfull($s, $b, $n)) |
92 | 0 | 1059 | if $res != $n |
93 | 1059 | 0 | if ($res = sysreadfull($s, $c, 1)) |
94 | 0 | 1059 | unless $c eq "," |
98 | 0 | 115 | if $!{'EINTR'} |
99 | 0 | 115 | unless defined $res |