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