line |
true |
false |
branch |
86
|
3 |
19 |
unless (ref $uri) |
96
|
0 |
22 |
if ($uri->scheme ne "ws" and $uri->scheme ne "wss") |
102
|
20 |
2 |
unless defined $host |
103
|
20 |
2 |
unless defined $port |
107
|
0 |
22 |
unless ($fh) |
120
|
3 |
19 |
if ($self->subprotocol) |
137
|
0 |
0 |
if ($fatal) { } |
147
|
0 |
22 |
if ($handshake->error) { } |
|
22 |
0 |
elsif ($handshake->is_done) { } |
157
|
3 |
19 |
if ($self->subprotocol) |
160
|
2 |
1 |
if (defined $sb) { } |
162
|
1 |
1 |
unless ($subprotocol{$sb}) |
195
|
22 |
0 |
unless ($self->env_proxy) |
204
|
0 |
0 |
$scheme eq 'wss' ? : |
|
0 |
0 |
$scheme eq 'ws' ? : |
208
|
0 |
0 |
if (defined $connector->proxy_for($host, $port)) |