| blib/lib/Data/Validate/Sanctions.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 49 | 70 | 70.0 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 121 | 294 | 0 | 77 | $args->{$field} and $entry->{$field} |
| 0 | 0 | 77 | $args->{$field} and $entry->{$field} and @{$entry->{$field}} | |
| 297 | 9 | 0 | 40 | &Data::Validate::Sanctions::stat($sanction_file)->mtime <= $self->{'last_time'} and $self->{'_data'} |
| 390 | 2 | 110 | 4 | $name_matches_count == 1 and $small_tokens_size == 1 |
| line | l | !l | condition | |
|---|---|---|---|---|
| 49 | 0 | 0 | $self->{'_data'}{$k} //= {} | |
| 50 | 0 | 0 | $self->{'_data'}{$k}{'updated'} //= 0 | |
| 51 | 0 | 0 | $self->{'_data'}{$k}{'content'} //= [] | |
| 84 | 3 | 1 | shift() // die("sanction_file is needed") | |
| 246 | 34 | 23 | $entry->{$dob_field} //= [] | |
| 254 | 1 | 20 | $entry->{'dob_text'} // [] | |
| 274 | 1 | 2 | $match->{'entry'}{'dob_text'} // [] | |
| 291 | 49 | 2 | 0 | $self->{'last_time'} //= 0 |
| 292 | 40 | 9 | $self->{'_data'} //= {} | |
| 293 | 40 | 9 | 0 | $self->{'_sanctioned_name_tokens'} //= {} |
| 294 | 40 | 9 | $self->{'_token_sanctioned_names'} //= {} | |
| 325 | 14 | 1 | $self->{'_data'}{$source}{'content'} // [] | |
| 331 | 6934 | 46212 | $self->{'_index'}{$name} // [] |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 32 | 7 | 2 | 0 | $args{'sanction_file'} // _default_sanction_file() |
| 0 | 1071 | 4 | $args{'sanction_file'} // _default_sanction_file() | |
| 37 | 0 | 9 | 0 | ref $class || $class |
| 30 | 4 | 1071 | ref $class || $class | |
| 52 | 0 | 0 | 0 | $self->{'_data'}{$k}{'updated'} != $new_data->{$k}{'updated'} or scalar @{$self->{'_data'}{$k}{'content'}} != scalar @{$new_data->{$k}{'content'}} |
| 211 | 43 | 4 | 0 | $last_name || () |
| 253 | 16 | 1 | 4 | @{$entry->{'dob_epoch'}} || @{$entry->{'dob_year'}} |
| 255 | 1 | 3 | 17 | $has_dob_text or $has_no_epoch_or_year |
| 354 | 1 | 4 | 0 | $ENV{'SANCTION_FILE'} // File::ShareDir::dist_file("Data-Validate-Sanctions", "sanctions.yml") |
| 390 | 14 | 4 | 110 | $name_matches_count > 1 or $name_matches_count == 1 and $small_tokens_size == 1 |