line |
true |
false |
branch |
73
|
0 |
0 |
if $Debug > 10 |
75
|
0 |
0 |
unless ref $socket eq "GLOB" |
79
|
0 |
0 |
unless my $ctx = &Net::SSLeay::CTX_new() |
80
|
0 |
0 |
unless my $ssl = &Net::SSLeay::new($ctx) |
88
|
0 |
0 |
if $Debug |
106
|
0 |
0 |
unless defined $msg |
107
|
0 |
0 |
unless $resp = &Net::SSLeay::write($ssl, $msg) |
115
|
0 |
0 |
if (wantarray) { } |
123
|
0 |
0 |
$line ? : |
130
|
0 |
0 |
unless defined $$offset |
133
|
0 |
0 |
unless defined(my $read = Net::SSLeay::ssl_read_all($ssl, $$len)) |
137
|
0 |
0 |
if $$offset > $buf_len |
145
|
0 |
0 |
unless defined $offset |
149
|
0 |
0 |
if &Net::SSLeay::write($ssl, substr($buf, $offset, $len)) |
156
|
0 |
0 |
if $Debug > 10 |
183
|
0 |
0 |
UNIVERSAL::isa($obj, 'Net::SSLeay::Handle') ? : |
200
|
0 |
0 |
if @_ > 1 |
219
|
0 |
0 |
if $Debug > 10 |
224
|
0 |
0 |
$Net::SSLeay::proxyhost ? : |
229
|
0 |
0 |
unless socket my $socket, &PF_INET(), &SOCK_STREAM(), 0 |
230
|
0 |
0 |
unless connect $socket, $host_params |
233
|
0 |
0 |
if ($phost) |
247
|
0 |
0 |
if $Initialized++ |