| line |
true |
false |
branch |
|
37
|
0 |
5 |
if $storage eq "redis"
|
|
64
|
0 |
0 |
if (not $new_data->{$k}{'error'} and $self->{'_data'}{$k}{'error'})
|
|
69
|
0 |
0 |
if ($new_data->{$k}{'error'}) { }
|
|
|
0 |
0 |
elsif ($self->{'_data'}{$k}{'updated'} != $new_data->{$k}{'updated'} or scalar @{$self->{'_data'}{$k}{'content'}} != scalar @{$new_data->{$k}{'content'}}) { }
|
|
76
|
0 |
0 |
if $args{'verbose'}
|
|
80
|
0 |
0 |
if $args{'verbose'}
|
|
84
|
0 |
0 |
if ($updated)
|
|
96
|
0 |
0 |
if ($list) { }
|
|
112
|
0 |
7 |
$instance ? :
|
|
131
|
0 |
0 |
unless $self->{'_data'}
|
|
151
|
0 |
0 |
unless $args->{$field} and $entry->{$field} and @{$entry->{$field}}
|
|
153
|
0 |
0 |
unless &any(sub {
|
|
218
|
0 |
14 |
&blessed($_[0]) ? :
|
|
219
|
5 |
9 |
unless ($self)
|
|
229
|
0 |
14 |
if (ref $_[0] eq "HASH")
|
|
237
|
56 |
0 |
unless $value
|
|
262
|
149 |
16 |
unless _name_matches(\@client_name_tokens, $sanctioned_name_tokens)
|
|
266
|
0 |
19 |
unless $matched_args
|
|
270
|
5 |
14 |
unless defined $date_of_birth
|
|
282
|
2 |
25 |
if $checked_dob
|
|
286
|
11 |
1 |
@{$entry->{'dob_epoch'}} || @{$entry->{'dob_year'}} ? :
|
|
287
|
0 |
12 |
@{$entry->{'dob_text'} // [];} ? :
|
|
288
|
1 |
11 |
if ($has_dob_text or $has_no_epoch_or_year)
|
|
305
|
0 |
1 |
unless $sanction_name eq $client_name
|
|
310
|
0 |
1 |
if (@$dob_text)
|
|
331
|
9 |
5 |
if $self->{'_data'} and $self->{'last_data_load'} + $self->IGNORE_OPERATION_INTERVAL > time
|
|
333
|
5 |
0 |
if (-e $sanction_file)
|
|
335
|
0 |
0 |
if $file_modify_time <= $self->{'last_modification'} and $self->{'_data'}
|
|
392
|
0 |
0 |
unless rename $new_sanction_file, $sanction_file
|
|
427
|
182 |
300 |
if &any(sub {
|
|
434
|
16 |
149 |
if $name_matches_count > 1 or $name_matches_count == 1 and $small_tokens_size == 1
|