blib/lib/Perlbal/SocketSSL.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 0 | 16 | 0.0 |
line | true | false | branch |
---|---|---|---|
38 | 0 | 0 | unless ref $self |
67 | 0 | 0 | if (defined $sock) |
99 | 0 | 0 | if ($! == 11) { } |
100 | 0 | 0 | if ($Perlbal::SocketSSL::SSL_ERROR == 56751016) { } |
0 | 0 | elsif ($Perlbal::SocketSSL::SSL_ERROR == 56751592) { } | |
143 | 0 | 0 | unless my $self = shift() |
150 | 0 | 0 | if (my $ds = $${*$self;}{'_danga_socket'}) { } |
153 | 0 | 0 | if $ds->sock |