File Coverage

blib/lib/Sah/Schema/latin_lowercase_letter.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::latin_lowercase_letter;
2              
3 1     1   449992 use strict;
  1         3  
  1         196  
4              
5             our $AUTHORITY = 'cpan:PERLANCAR'; # AUTHORITY
6             our $DATE = '2024-02-06'; # DATE
7             our $DIST = 'Sah-Schemas-Str'; # DIST
8             our $VERSION = '0.018'; # VERSION
9              
10             our $schema = [str => {
11             summary => 'A single latin lowercase letter, i.e. a-z',
12             'x.perl.coerce_rules' => ['From_str::to_lower'],
13             len => 1,
14             match => qr/\A[a-z]\z/,
15              
16             examples => [
17             {value=>'', valid=>0},
18             {value=>'A', valid=>1, validated_value=>'a'},
19             {value=>'a', valid=>1},
20             {value=>'ab', valid=>0, summary=>'Multiple letters'},
21             {value=>'1', valid=>0, summary=>'Non-letter'},
22             {value=>';', valid=>0, summary=>'Non-letter'},
23             ],
24              
25             }];
26              
27             1;
28             # ABSTRACT:
29              
30             __END__