| line |
true |
false |
branch |
|
40
|
1 |
2 |
$self->development ? : |
|
47
|
0 |
0 |
unless ($self->{'_socket'} and $self->{'_socket'}->opened) |
|
52
|
0 |
0 |
if defined $self->{$_} |
|
58
|
0 |
0 |
if (my $proxy = $self->proxy) { } |
|
59
|
0 |
0 |
unless $proxy =~ s[^http://][] |
|
69
|
0 |
0 |
unless $code eq '200' |
|
71
|
0 |
0 |
unless 'IO::Socket::SSL'->start_SSL($socket, 'SSL_hostname', $host, %ssl_opts) |
|
80
|
0 |
0 |
unless $socket = 'IO::Socket::SSL'->new('PeerHost', $host, 'PeerPort', $port, %ssl_opts) |
|
108
|
3 |
2 |
unless defined $v |
|
114
|
1 |
0 |
if ($self->team_id and $self->auth_key and $self->key_id) |
|
148
|
1 |
0 |
if (my $req = shift @{$$self{'_request'};}) { } |
|
153
|
0 |
0 |
if ref $done_cb eq 'CODE' |