File Coverage

blib/lib/Config/Model/Role/Utils.pm
Criterion Covered Total %
statement 23 23 100.0
branch 2 2 100.0
condition n/a
subroutine 7 7 100.0
pod n/a
total 32 32 100.0


line stmt bran cond sub pod time code
1             #
2             # This file is part of Config-Model
3             #
4             # This software is Copyright (c) 2005-2022 by Dominique Dumont.
5             #
6             # This is free software, licensed under:
7             #
8             # The GNU Lesser General Public License, Version 2.1, February 1999
9             #
10              
11             # ABSTRACT: Provide some utilities
12              
13             use Mouse::Role;
14 59     59   26011 use strict;
  59         143  
  59         378  
15 59     59   15986 use warnings;
  59         111  
  59         982  
16 59     59   263 use 5.020;
  59         125  
  59         1308  
17 59     59   1110  
  59         219  
18             use feature qw/signatures postderef/;
19 59     59   340 no warnings qw/experimental::signatures experimental::postderef/;
  59         133  
  59         4970  
20 59     59   380  
  59         130  
  59         6512  
21             return $args->@* > @param_list ? $args->@*
22 38597     38597   44803 : map { $_ => shift @$args; } @param_list;
  38597         43121  
  38597         47322  
  38597         40895  
23             }
24 38597 100       127179  
  7625         29161  
25             1;
26              
27              
28             =pod
29              
30             =encoding UTF-8
31              
32             =head1 NAME
33              
34             Config::Model::Role::Utils - Provide some utilities
35              
36             =head1 VERSION
37              
38             version 2.151
39              
40             =head1 AUTHOR
41              
42             Dominique Dumont
43              
44             =head1 COPYRIGHT AND LICENSE
45              
46             This software is Copyright (c) 2005-2022 by Dominique Dumont.
47              
48             This is free software, licensed under:
49              
50             The GNU Lesser General Public License, Version 2.1, February 1999
51              
52             =cut