File Coverage

blib/lib/TableData/Munge/Concat.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::Concat;
2              
3 1     1   75620 use 5.010001;
  1         12  
4 1     1   5 use strict;
  1         2  
  1         20  
5 1     1   4 use warnings;
  1         7  
  1         23  
6              
7 1     1   504 use Role::Tiny::With;
  1         5471  
  1         135  
8              
9             our $AUTHORITY = 'cpan:PERLANCAR'; # AUTHORITY
10             our $DATE = '2023-06-14'; # DATE
11             our $DIST = 'TableDataRoles-Standard'; # DIST
12             our $VERSION = '0.016'; # VERSION
13              
14             with 'TableDataRole::Munge::Concat';
15              
16             our %SPEC;
17              
18             $SPEC{new} = {
19             v => 1.1,
20             is_meth => 1,
21             is_func => 0,
22             args => {
23             tabledatalist => {
24             schema => ['array*', min_len=>1], # TMP
25             req => 1,
26             },
27             },
28             };
29              
30             1;
31             # ABSTRACT: Access a series of other tabledata instances
32              
33             __END__