File Coverage

blib/lib/TableData/Munge/Reverse.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::Reverse;
2              
3 1     1   73748 use 5.010001;
  1         20  
4 1     1   5 use strict;
  1         2  
  1         20  
5 1     1   4 use warnings;
  1         3  
  1         23  
6              
7 1     1   529 use Role::Tiny::With;
  1         5128  
  1         127  
8              
9             our $AUTHORITY = 'cpan:PERLANCAR'; # AUTHORITY
10             our $DATE = '2023-02-24'; # DATE
11             our $DIST = 'TableDataRoles-Standard'; # DIST
12             our $VERSION = '0.015'; # VERSION
13              
14             with 'TableDataRole::Munge::Reverse';
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             },
28             };
29              
30             1;
31             # ABSTRACT: Reverse the order of rows of another tabledata
32              
33             __END__