| blib/lib/Net/Server/Proto/SSL.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 5 | 26 | 19.2 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 110 | 1 | 0 | 0 | $port eq '0' and $port = $sock->sockport |
| 1 | 0 | 0 | $port =~ /\D/ and $port = $sock->sockport | |
| 220 | 0 | 0 | 0 | defined $bytes and length $content >= $bytes |
| 0 | 0 | 0 | defined $end_qr and $content =~ /$end_qr/ |
| line | l | !l | condition |
|---|---|---|---|
| 206 | 1 | 0 | delete do { *$client }->{'_parent_sock'} || die("Could not get handshake from accept\n") |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 57 | 0 | 2 | 0 | $server->{'server'}{'ssl_args'} ||= do { my(%temp) = map({$_, undef;} @ssl_args); $server->configure({map({$_, \$temp{$_};} @ssl_args)}); \%temp } |
| 148 | 0 | 0 | 0 | $class || ref $sock |
| 150 | 0 | 1 | 0 | $class || ref $sock |
| 212 | 0 | 0 | 0 | defined $bytes or defined $end_qr |