| line |
true |
false |
branch |
|
447
|
1 |
5 |
unless $request =~ /Upgrade:\s*websocket/i |
|
450
|
1 |
4 |
unless $request =~ /Connection:.*Upgrade/i |
|
453
|
4 |
0 |
if ($request =~ /Sec-WebSocket-Key:\s*(\S+)/i) |
|
458
|
4 |
0 |
if ($request =~ /Sec-WebSocket-Version:\s*(\d+)/i) |
|
463
|
1 |
3 |
if ($request =~ /Sec-WebSocket-Protocol:\s*([^\r\n]+)/i) |
|
469
|
3 |
1 |
$result{'ws_key'} && $result{'ws_version'} == 13 ? : |
|
478
|
1 |
26 |
unless my $client_key = $args{'key'} |
|
488
|
1 |
25 |
if ($protocol) |
|
501
|
4 |
3 |
unless defined $key and length $key == 24 |
|
502
|
0 |
3 |
unless $key =~ m[^[A-Za-z0-9+/]{22}==$] |