blib/lib/Net/WebSocket/Handshake/Server.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 15 | 22 | 68.1 |
line | true | false | branch |
---|---|---|---|
70 | 0 | 1 | if ($method ne 'GET') |
82 | 1 | 5 | if ($name eq 'sec-websocket-version') { } |
1 | 4 | elsif ($name eq 'sec-websocket-key') { } | |
1 | 3 | elsif ($name eq 'sec-websocket-protocol') { } | |
83 | 0 | 1 | if ($value ne 13) |
96 | 2 | 1 | unless (defined $self->{'_subprotocol'}) |
118 | 1 | 0 | defined $self->{'_subprotocol'} ? : |
1 | 0 | if $self->{'_no_use_legacy'} | |
128 | 0 | 1 | unless $self->{'_version_ok'} |
129 | 0 | 1 | unless $self->{'key'} |
131 | 0 | 1 | if @needed |