line |
true |
false |
branch |
193
|
8 |
1 |
if (defined $args{'Warnings'}) |
197
|
8 |
1 |
if (defined $args{'warnings'}) |
207
|
38 |
0 |
if ($GlobalDefaults{'warnings'}) |
239
|
15 |
0 |
if (defined $val and $val =~ /^[\+\-]?\d+\.?\d*$/) { } |
250
|
13 |
0 |
if (defined $val and $val =~ /^[\+\-]?\d+\.?\d*$/) { } |
352
|
14 |
754 |
unless (defined $key and defined $val) |
356
|
123 |
631 |
if ($key eq 'warnings') |
360
|
0 |
631 |
unless ($ValidateRoutine{$key}) |
364
|
607 |
24 |
if ($ValidateRoutine{$key}($val)) { } |
389
|
0 |
16 |
if (@_ % 2 != 0) |
396
|
0 |
21 |
if ($key =~ /[A-Z]/) |
403
|
2 |
14 |
if (exists $self->{'Defaults'}{'warnings'}) |
408
|
9 |
7 |
if (exists $self->{'Defaults'}{'country'}) |
409
|
0 |
9 |
unless (exists $Config{'Urls'}{$self->{'Defaults'}{'country'}}) |
419
|
0 |
10 |
if ($error) |
442
|
0 |
142 |
if (@_ % 2 != 0) |
448
|
0 |
142 |
unless (ref $self) |
457
|
0 |
36 |
if grep {$key eq $_;} keys %GlobalDefaults |
462
|
426 |
3408 |
if (defined $Config{'Defaults'}{$key}) |
469
|
38 |
720 |
if ($error) |
479
|
0 |
104 |
if (defined $args{'number_of_results'} and $args{'number_of_results'} > $Config{'MaxResults'}) |
502
|
7 |
19 |
unless (ref $self) |
506
|
26 |
0 |
if (my $request = $self->request(@_)) { } |
531
|
0 |
3 |
unless (ref $self) |
537
|
0 |
3 |
unless ($response) |
562
|
6 |
1 |
if (defined $response and $response->status_code == 200) { } |
603
|
0 |
2 |
unless (ref $self) |