File Coverage

blib/lib/TableData/Munge/GroupRows.pm
Criterion Covered Total %
statement 11 11 100.0
branch n/a
condition n/a
subroutine 4 4 100.0
pod n/a
total 15 15 100.0


line stmt bran cond sub pod time code
1             package TableData::Munge::GroupRows;
2              
3 2     2   466993 use 5.010001;
  2         7  
4 2     2   11 use strict;
  2         5  
  2         70  
5 2     2   15 use warnings;
  2         4  
  2         124  
6              
7 2     2   928 use Role::Tiny::With;
  2         13702  
  2         435  
8              
9             our $AUTHORITY = 'cpan:PERLANCAR'; # AUTHORITY
10             our $DATE = '2024-05-14'; # DATE
11             our $DIST = 'TableDataRoles-Standard'; # DIST
12             our $VERSION = '0.025'; # VERSION
13              
14             with 'TableDataRole::Munge::GroupRows';
15              
16             our %SPEC;
17              
18             $SPEC{new} = {
19             v => 1.1,
20             is_meth => 1,
21             is_func => 0,
22             args => {
23             tabledata => {
24             schema => ['any*'], # TMP
25             req => 1,
26             },
27             key => {
28             summary => 'Name of key column',
29             schema => 'str*',
30             default => 'key',
31             },
32             calc_key => {
33             schema => 'code*',
34             req => 1,
35             },
36             },
37             };
38              
39             1;
40             # ABSTRACT: Group rows from another tabledata
41              
42             __END__