File Coverage

blib/lib/Benchmark/Featureset/ParamCheck/Implementation/PVC/Moose.pm

Criterion	Covered	Total	%
statement	28	28	100.0
branch			n/a
condition			n/a
subroutine	11	11	100.0
pod	0	2	0.0
total	39	41	95.1

use v5.12;
use strict;
use warnings;


our $AUTHORITY = 'cpan:TOBYINK';
our $VERSION   = '0.007';

use parent qw(Benchmark::Featureset::ParamCheck::Base::PVC);
use Params::ValidationCompiler 0.24 qw(validation_for);
use Moose::Util::TypeConstraints 2.2002;
use namespace::autoclean;

my $t = \&Moose::Util::TypeConstraints::find_or_parse_type_constraint;

use constant long_name => 'Params::ValidationCompiler with Moose';
use constant short_name => 'PVC-Moose';

	state $check = validation_for(
		params => {
			integer   => { type => $t->('Int') },
			hashes    => { type => $t->('ArrayRef[HashRef]') },
			object    => { type => duck_type(Printable => [qw/ print close /]) },
		},
	);
}

	state $check = validation_for(
		params => [
			{ type => $t->('Int') },
			{ type => $t->('ArrayRef[HashRef]') },
			{ type => duck_type(Printable => [qw/ print close /]) },
		],
	);
}

1;