File Coverage

blib/lib/SortKey/Num/length.pm
Criterion Covered Total %
statement 8 11 72.7
branch n/a
condition n/a
subroutine 3 5 60.0
pod 0 2 0.0
total 11 18 61.1


line stmt bran cond sub pod time code
1             package SortKey::Num::length;
2              
3 1     1   380851 use 5.010001;
  1         3  
4 1     1   4 use strict;
  1         1  
  1         22  
5 1     1   4 use warnings;
  1         2  
  1         174  
6              
7             our $AUTHORITY = 'cpan:PERLANCAR'; # AUTHORITY
8             our $DATE = '2024-05-15'; # DATE
9             our $DIST = 'SortKey-Num-length'; # DIST
10             our $VERSION = '0.003'; # VERSION
11              
12             sub meta {
13             return +{
14 0     0 0   v => 1,
15             args => {
16             },
17             };
18             }
19              
20             sub gen_keygen {
21 0     0 0   my %args = @_;
22              
23 0           \&CORE::length;
24             }
25              
26             1;
27             # ABSTRACT: String length as sort key
28              
29             __END__