line |
true |
false |
branch |
31
|
11 |
2 |
if @_ % 2 |
37
|
4 |
32 |
if (defined(my $value = delete $conf{$_})) |
43
|
4 |
20 |
if (defined(my $value = delete $conf{$_})) |
47
|
10 |
2 |
unless ($self->json) |
50
|
10 |
2 |
unless ($self->ua) |
51
|
9 |
1 |
unless defined $conf{'agent'} |
54
|
9 |
1 |
unless exists $conf{'env_proxy'} |
70
|
4 |
1 |
if @_ % 2 |
79
|
2 |
1 |
if @_ % 2 |
101
|
15 |
16 |
if (@_) |
103
|
2 |
13 |
unless $json and $json->isa('JSON') |
113
|
17 |
7 |
if (@_) |
115
|
4 |
13 |
unless (defined $referer and $referer =~ /\S/) |
119
|
1 |
3 |
$caller && $caller eq ref($self) . '::new' ? : |
131
|
15 |
22 |
if (@_) |
133
|
2 |
13 |
unless $ua and $ua->isa('LWP::UserAgent') |
149
|
4 |
4 |
if (defined $text and $text =~ /\S/) { } |
151
|
1 |
3 |
if (length $text > 5000) |
162
|
3 |
0 |
if defined $$self{'key'} |
163
|
2 |
1 |
if (defined $langpair) { } |
174
|
2 |
1 |
if ($length > 2073) { } |
175
|
1 |
1 |
if (defined $langpair) { } |
190
|
1 |
1 |
if ($response->is_success) { } |
192
|
1 |
0 |
if ($@) { } |
205
|
0 |
4 |
if ($] < 5.007) { } |
211
|
0 |
0 |
if (length $_[0] == do {
use bytes;
length $_[0]
}) |
229
|
0 |
1 |
$_[0]{'responseStatus'} && $_[0]{'responseStatus'} != 200 ? : |
241
|
0 |
1 |
$_[0]{'responseData'} ? : |
245
|
0 |
1 |
$_[0]{'responseData'} ? : |
252
|
0 |
1 |
$_[0]{'responseData'} ? : |
256
|
0 |
1 |
$_[0]{'responseData'} ? : |