blib/lib/Protocol/WebSocket/Handshake/Client.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 19 | 22 | 86.3 |
line | true | false | branch |
---|---|---|---|
16 | 13 | 6 | if defined $self->{'url'} |
18 | 5 | 14 | if (my $version = $self->{'version'}) |
30 | 0 | 4 | unless $url |
43 | 18 | 0 | unless ($res->is_done) |
44 | 2 | 16 | unless ($res->parse($_[0])) |
49 | 6 | 10 | if ($res->is_done) |
50 | 0 | 6 | if ($req->version eq 'draft-ietf-hybi-00' and $req->checksum ne $res->checksum) |
77 | 8 | 9 | unless ref $url |
79 | 3 | 14 | if $url->secure |
84 | 3 | 14 | $url->secure ? : |
9 | 8 | if defined $url->port and $url->secure ? $url->port ne '443' : $url->port ne '80' |