Condition Coverage

File:blib/lib/Params/Validate/Strict.pm
Coverage:64.6%

line%coveragecondition
931100
ABdec
000
011
1X1
$params->{'schema'} || $params->{'members'}
932100
ABdec
000
011
1X1
$params->{'args'} || $params->{'input'}
933100
Adec
00
11
$params->{'unknown_parameter_handler'} || 'die'
943100
Adec
00
11
$params->{'description'} || 'validate_strict'
94625
ABCdec
0XX0
1000
1011
11X1
$schema->{'members'} and $schema->{'description'} || $schema->{'error_msg'}
952100
ABdec
0X0
100
111
ref $args ne "HASH" and ref $args ne "ARRAY"
100
ABdec
0X0
100
111
exists $params->{'args'} and not defined $args
1026100
ABdec
0X0
100
111
$rules->{'transform'} and defined $value
1045100
ABdec
0X0
100
111
ref $args eq "HASH" and not exists $args->{$key}
100
ABdec
0X0
100
111
ref $rules eq "HASH" and $is_optional
1085100
ABdec
0X0
100
111
defined(my $min = $rules->{'min'}) and defined(my $max = $rules->{'max'})
110380
ABCDdec
0XXX0
10XX0
110X0
11100
11111
ref $rule_value eq "CODE" and $rule_name ne "validate" and $rule_name ne "callback" and $rule_name ne "validator"
110767
ABdec
000
011
1X1
$rule_name eq "validate" or $rule_name eq "validator"
100
ABdec
000
011
1X1
$rule_name eq "memberof" or $rule_name eq "enum"
1110100
ABdec
000
011
1X1
$type eq "boolean" or $type eq "bool"
100
ABdec
000
011
1X1
$type eq "string" or $type eq "str"
100
ABdec
000
011
1X1
$type eq "number" or $type eq "float"
111233
ABdec
000
011
1X1
$rules->{'error_msg'} || "${rule_description}: Parameter '${key}' must be a string"
111425
ABCdec
00X0
0100
0111
1XX1
ref $value eq "" or defined $value and length $value
11150
ABdec
000
011
1X1
$rules->{'error_msg'} || "${rule_description}: Parameter '${key}' must be a string"
1168100
ABCdec
0000
0011
01X1
1XX1
$value eq "true" or $value eq "on" or $value eq "yes"
100
ABCdec
0000
0011
01X1
1XX1
$value eq "false" or $value eq "off" or $value eq "no"
1173100
ABdec
0X0
100
111
$value ne 1 and $value ne 0
1226100
ABdec
000
011
1X1
$type eq "string" or $type eq "str"
100
ABCdec
0000
0011
01X1
1XX1
$type eq "integer" or $type eq "number" or $type eq "float"
123933
ABdec
000
011
1X1
$rules->{'error_msg'} || "${rule_description}: String parameter '${key}' too short, ($len characters), must be at least $rule_value characters"
12430
ABdec
000
011
1X1
$rules->{'error_msg'} || "${rule_description}: '${key}' can't be decoded"
131167
ABdec
000
011
1X1
$type eq "string" or $type eq "str"
100
ABCdec
0000
0011
01X1
1XX1
$type eq "integer" or $type eq "number" or $type eq "float"
131733
ABdec
000
011
1X1
$rules->{'error_msg'} || "${rule_description}: String parameter '${key}' too long, ($len characters), must be no longer than $rule_value"
13210
ABdec
000
011
1X1
$rules->{'error_msg'} || "${rule_description}: '${key}' can't be decoded"
138667
ABdec
000
011
1X1
$rules->{'type'} eq "arrayref" or $rules->{'type'} eq "ArrayRef"
141667
ABdec
000
011
1X1
$rules->{'type'} eq "arrayref" or $rules->{'type'} eq "ArrayRef"
143975
ABCdec
0000
0011
01X1
1XX1
$rules->{'type'} eq "integer" or $rules->{'type'} eq "number" or $rules->{'type'} eq "float"
1445100
ABdec
000
011
1X1
!defined($rules->{'case_sensitive'}) || $rules->{'case_sensitive'} == 1
147175
ABCdec
0000
0011
01X1
1XX1
$rules->{'type'} eq "integer" or $rules->{'type'} eq "number" or $rules->{'type'} eq "float"
147733
ABdec
000
011
1X1
!defined($rules->{'case_sensitive'}) || $rules->{'case_sensitive'} == 1
153433
ABdec
000
011
1X1
$rules->{'type'} eq "arrayref" or $rules->{'type'} eq "ArrayRef"
153767
ABdec
0X0
100
111
$custom_type and $custom_type->{'type'}
154167
ABdec
0X0
100
111
$custom_type and $custom_type->{'transform'}
155033
ABdec
000
011
1X1
$type eq "number" or $rule_value eq "float"
67
ABdec
000
011
1X1
$type eq "string" or $type eq "Str"
156067
ABdec
000
011
1X1
ref $member or $member =~ /\D/
156967
ABdec
000
011
1X1
ref $member or not $member =~ /^[-+]?(\d*\.\d+|\d+\.?\d*)$/
160033
ABdec
000
011
1X1
$value < 0 or $value > 2147483647
160867
ABdec
000
011
1X1
$rules->{'type'} eq "arrayref" or $rules->{'type'} eq "ArrayRef"
16430
ABdec
000
011
1X1
"${rule_description}: Parameter '${key}': 'validate' only supports coderef, not " . ref($rule_value) // $rule_value
171467
ABdec
000
011
1X1
not ref $validator or ref $validator ne "CODE"
177475
ABCdec
0XX0
10X0
1100
1111
ref $rules eq "HASH" and exists $rules->{'default'} and not exists $result{$key}
177975
ABCdec
0XX0
10X0
1100
1111
ref $rules eq "HASH" and $rules->{'schema'} and ref $result{$key} eq "HASH"
182233
ABdec
000
011
1X1
$rel->{'description'} || 'Cannot specify both ' . join(' and ', @present)
183733
ABdec
000
011
1X1
$rel->{'description'} || 'Must specify at least one of: ' . join(', ', @params)
184933
ABdec
0X0
100
111
exists $args->{$if_param} and defined $args->{$if_param}
185333
ABdec
0X0
100
111
exists $args->{$then_param} and defined $args->{$then_param}
18540
ABdec
000
011
1X1
$rel->{'description'} || "When $if_param is specified, $then_param is required"
186833
ABdec
0X0
100
111
exists $args->{$param} and defined $args->{$param}
186933
ABdec
0X0
100
111
exists $args->{$requires} and defined $args->{$requires}
187033
ABdec
000
011
1X1
$rel->{'description'} || "$param requires $requires to be specified"
188625
ABCdec
0XX0
10X0
1100
1111
exists $args->{$if_param} and defined $args->{$if_param} and $args->{$if_param}
188833
ABdec
0X0
100
111
exists $args->{$then_param} and defined $args->{$then_param}
190733
ABdec
000
011
1X1
$rel->{'description'} || "When $if_param is specified, $then_param must be $operator $value (got $actual)"
192333
ABdec
0X0
100
111
exists $args->{$if_param} and defined $args->{$if_param}
192633
ABdec
0X0
100
111
exists $args->{$then_param} and defined $args->{$then_param}
192833
ABdec
000
011
1X1
$rel->{'description'} || "When $if_param equals '${equals}', $then_param is required"