| line |
true |
false |
branch |
|
15
|
7 |
7 |
@_ > 1 ? : |
|
18
|
16 |
179 |
@_ > 1 ? : |
|
21
|
0 |
260 |
@_ > 1 ? : |
|
29
|
4 |
132 |
@_ > 1 ? : |
|
39
|
6 |
32 |
if defined $value |
|
42
|
4 |
28 |
unless defined $value |
|
47
|
0 |
2 |
@_ > 1 ? : |
|
48
|
0 |
2 |
@_ > 1 ? : |
|
64
|
178 |
66 |
if ($version eq 'draft-hixie-75' or $version eq 'draft-ietf-hybi-00') { } |
|
|
66 |
0 |
elsif ($version eq 'draft-ietf-hybi-10' or $version eq 'draft-ietf-hybi-17') { } |
|
65
|
0 |
178 |
unless defined $self->host |
|
72
|
136 |
42 |
$self->origin ? : |
|
74
|
13 |
165 |
if not $self->origin and $self->secure |
|
76
|
58 |
120 |
if ($version eq 'draft-hixie-75') { } |
|
|
120 |
0 |
elsif ($version eq 'draft-ietf-hybi-00') { } |
|
77
|
16 |
42 |
if defined $self->subprotocol |
|
83
|
16 |
104 |
if defined $self->subprotocol |
|
90
|
0 |
66 |
unless defined $self->key |
|
100
|
26 |
40 |
if defined $self->subprotocol |
|
107
|
16 |
228 |
if (@{$self->cookies;}) |
|
118
|
9 |
10 |
if $self->version eq 'draft-ietf-hybi-00' |
|
149
|
3 |
15 |
unless ($line =~ m[^HTTP/1\.1 $status ]) |
|
160
|
6 |
9 |
if ($self->field('Sec-WebSocket-Accept')) { } |
|
|
7 |
2 |
elsif ($self->field('Sec-WebSocket-Origin')) { } |
|
166
|
2 |
5 |
if length $self->{'buffer'} < 16 |
|
175
|
13 |
0 |
if $self->_finalize |
|
184
|
2 |
11 |
if ($self->version eq 'draft-hixie-75') { } |
|
|
5 |
6 |
elsif ($self->version eq 'draft-ietf-hybi-00') { } |
|
186
|
0 |
2 |
unless defined $location |
|
190
|
0 |
2 |
unless $url->parse($self->location) |
|
202
|
0 |
5 |
unless defined $location |
|
206
|
0 |
5 |
unless $url->parse($self->location) |