Branch Coverage

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')
80 1 5 if ($name eq 'Sec-WebSocket-Version') { }
1 4 elsif ($name eq 'Sec-WebSocket-Key') { }
1 3 elsif ($name eq 'Sec-WebSocket-Protocol') { }
81 0 1 if ($value ne 13)
94 2 1 unless (defined $self->{'_subprotocol'})
116 1 0 defined $self->{'_subprotocol'} ? :
1 0 if $self->{'_no_use_legacy'}
126 0 1 unless $self->{'_version_ok'}
127 0 1 unless $self->{'key'}
129 0 1 if @needed