| line |
true |
false |
branch |
|
125
|
0 |
1 |
$max_results > 1000 ? : |
|
137
|
0 |
1 |
defined $proxy ? : |
|
157
|
0 |
4 |
if defined $response |
|
174
|
0 |
0 |
unless defined $self->{'credentials'} |
|
184
|
0 |
0 |
if (&Switch::case(200)) |
|
189
|
0 |
0 |
if (&Switch::case(401)) { } |
|
202
|
2 |
2 |
if (not exists $parameters->{'q'}) { } |
|
217
|
4 |
0 |
if ($self->{'debug_mode'}) |
|
221
|
0 |
0 |
if (not defined $self->{'token_expiration'} or $self->{'token_expiration'} < time) |
|
223
|
0 |
0 |
if $err |
|
229
|
0 |
0 |
if (&Switch::case(200) or 404) |
|
233
|
0 |
0 |
if (&Switch::case(301)) |
|
236
|
0 |
0 |
if (&Switch::case(414) or 429 or 401 or 403 or 503) { } |
|
258
|
0 |
4 |
if defined $desired_fields and $desired_fields ne 'all' |
|
259
|
2 |
2 |
if defined $criteria |
|
267
|
0 |
0 |
if (defined $desired_fields) { } |
|
278
|
0 |
0 |
ref $desired_fields eq 'ARRAY' ? : |
|
281
|
0 |
0 |
if (exists $useful_fields_aliases->{$desired_field}) |
|
282
|
0 |
0 |
if (ref $useful_fields_aliases->{$desired_field} eq 'ARRAY') { } |
|
297
|
0 |
13 |
unless defined $self->{'current_endpoint'} |
|
300
|
1 |
12 |
if (exists $useful_fields_aliases->{$field_name}) |
|
301
|
0 |
1 |
if (ref $useful_fields_aliases->{$field_name} eq 'ARRAY') |
|
307
|
6 |
7 |
if ($search_mode eq 'aproximate') |
|
314
|
2 |
4 |
if &any(sub {
$_ eq $field_name;
}
, @{$$historized_fields{$self->{'current_endpoint'}};}) |
|
326
|
5 |
2 |
if ($search_mode eq 'exact') { } |
|
|
2 |
0 |
elsif ($search_mode eq 'begin') { } |
|
333
|
5 |
2 |
if &any(sub {
$_ eq $field_name;
}
, @{$$historized_fields{$self->{'current_endpoint'}};}) |
|
343
|
0 |
2 |
if (&Switch::case('siren')) |
|
344
|
2 |
0 |
if (&Switch::case('siret')) { } |
|
354
|
0 |
1 |
unless $siren_number =~ /^\d{${\9;}}$/ |
|
366
|
0 |
0 |
unless $siren_number =~ /^\d{${\3;},${\9;}}$/ |
|
378
|
0 |
1 |
unless $siret_number =~ /^\d{${\14;}}$/ |
|
390
|
0 |
0 |
unless $siren_number =~ /^\d{${\9;}}$/ |
|
402
|
0 |
0 |
unless $siret_number =~ /^\d{${\3;},${\14;}}$/ |