File Coverage

blib/lib/Benchmark/Featureset/ParamCheck/Implementation/PVC/TypeTiny.pm
Criterion Covered Total %
statement 37 37 100.0
branch n/a
condition n/a
subroutine 14 14 100.0
pod 0 2 0.0
total 51 53 96.2


line stmt bran cond sub pod time code
1 4     4   13236 use v5.12;
  4         14  
2 4     4   26 use strict;
  4         9  
  4         75  
3 4     4   17 use warnings;
  4         7  
  4         246  
4              
5              
6             our $AUTHORITY = 'cpan:TOBYINK';
7             our $VERSION = '0.007';
8              
9             use parent qw(Benchmark::Featureset::ParamCheck::Base::PVC);
10 4     4   23 use Params::ValidationCompiler 0.24 qw(validation_for);
  4         15  
  4         24  
11 4     4   248 use Ref::Util 0.203 ();
  4         62  
  4         180  
12 4     4   21 use Ref::Util::XS 0.116 ();
  4         44  
  4         74  
13 4     4   19 use Types::Standard 1.001_009 -types;
  4         62  
  4         135  
14 4     4   21 use Type::Tiny::XS 0.012 ();
  4         81  
  4         33  
15 4     4   23034 use namespace::autoclean;
  4         86  
  4         75  
16 4     4   20  
  4         6  
  4         29  
17             use constant long_name => 'Params::ValidationCompiler with Type::Tiny';
18 4     4   234 use constant short_name => 'PVC-TT';
  4         7  
  4         217  
19 4     4   23  
  4         8  
  4         613  
20             state $check = validation_for(
21             params => {
22 118     118 0 435 integer => { type => Int },
23             hashes => { type => ArrayRef[HashRef] },
24             object => { type => HasMethods[qw/ print close /] },
25             },
26             );
27             }
28              
29             state $check = validation_for(
30             params => [
31             { type => Int },
32 107     107 0 294 { type => ArrayRef[HashRef] },
33             { type => HasMethods[qw/ print close /] },
34             ],
35             );
36             }
37              
38             1;