File Coverage

blib/lib/Role/TinyCommons/Tree/NodeMethods.pm
Criterion Covered Total %
statement 18 18 100.0
branch n/a
condition n/a
subroutine 5 5 100.0
pod n/a
total 23 23 100.0


line stmt bran cond sub pod time code
1             package Role::TinyCommons::Tree::NodeMethods;
2              
3 2     2   1468 use strict;
  2         5  
  2         64  
4 2     2   10 use Role::Tiny;
  2         5  
  2         10  
5 2     2   274 use Role::Tiny::With;
  2         6  
  2         246  
6              
7             our $AUTHORITY = 'cpan:PERLANCAR'; # AUTHORITY
8             our $DATE = '2021-10-07'; # DATE
9             our $DIST = 'Role-TinyCommons-Tree'; # DIST
10             our $VERSION = '0.128'; # VERSION
11              
12             with 'Role::TinyCommons::Tree::Node';
13              
14             BEGIN {
15 2     2   22 no strict 'refs'; ## no critic: TestingAndDebugging::ProhibitNoStrict
  2         5  
  2         275  
16 2     2   1035 require Code::Includable::Tree::NodeMethods;
17 2         19 for (grep {/\A[a-z]\w+\z/} keys %Code::Includable::Tree::NodeMethods::) {
  78         181  
18 52         76 *{$_} = \&{"Code::Includable::Tree::NodeMethods::$_"};
  52         273  
  52         128  
19             }
20             }
21              
22             1;
23             # ABSTRACT: Role that provides tree node methods
24              
25             __END__