File Coverage

blib/lib/Sah/Schema/business/id/nik.pm
Criterion Covered Total %
statement 3 3 100.0
branch n/a
condition n/a
subroutine 1 1 100.0
pod n/a
total 4 4 100.0


line stmt bran cond sub pod time code
1             package Sah::Schema::business::id::nik;
2              
3 1     1   389741 use strict;
  1         3  
  1         214  
4              
5             our $AUTHORITY = 'cpan:PERLANCAR'; # AUTHORITY
6             our $DATE = '2024-01-09'; # DATE
7             our $DIST = 'Sah-Schemas-Business-ID-NIK'; # DIST
8             our $VERSION = '0.003'; # VERSION
9              
10             our $schema = [str => {
11             summary => 'Indonesian citizenship registration number (NIK)',
12             prefilters => ['Str::remove_nondigit', 'Business::ID::NIK::check_nik'],
13             description => <<'MARKDOWN',
14              
15             MARKDOWN
16             examples => [
17             {value=>'', valid=>0, summary=>'Empty string'},
18             {value=>'123', valid=>0, summary=>'Too short'},
19             {value=>'3273010131900005', valid=>0, summary=>'Invalid date (month 13)'},
20             {value=>'3273010101900005', valid=>1},
21             {value=>'3273 0101 0190 0005', valid=>1, summary=>'Non-digits removed', validated_value=>'3273010101900005'},
22             ],
23             }];
24              
25             1;
26              
27             # ABSTRACT: Indonesian citizenship registration number (NIK)
28              
29             __END__