Branch Coverage

blib/lib/Validation/Class/Util.pm
Criterion Covered Total %
branch 33 52 63.4


line true false branch
40 19488 27663 if (scalar @_ == 1) { }
0 27663 elsif (@_ % 2) { }
41 0 19488 unless defined $_[0] and ref $_[0] eq 'HASH'
75 0 29916 unless $attrs
77 0 29916 if ref $default and ref $default ne 'CODE'
80 29916 0 unless ref $attrs eq 'ARRAY'
84 0 29916 unless $attr =~ /^[a-zA-Z_]\w*$/
89 29916 0 if (defined $default) { }
93 252991 1588 if (@_ == 1)
94 233130 19861 if exists $_[0]{$attr}
95 9564 10297 ref $default eq 'CODE' ? :
111 0 0 if @_ == 1
136 0 1836 unless $attrs
138 0 1836 if ref $default ne 'CODE'
141 1836 0 unless ref $attrs eq 'ARRAY'
145 0 1836 unless $attr =~ /^[a-zA-Z_]\w*$/
152 122886 0 if (@_ == 1)
153 120833 2053 if exists $_[0]{$attr}
188 4826 5806 'ARRAY' eq ref shift() ? :
196 65322 0 &blessed(shift()) ? :
202 92 564 'CODE' eq ref shift() ? :
208 234 740 'HASH' eq ref shift() ? :
214 0 0 'Validation::Class::Listing' eq ref shift() ? :
220 11 1 'Validation::Class::Mapping' eq ref shift() ? :
226 0 0 'prototype_registry'->has(shift()) ? :
232 17 520 'REGEXP' eq uc ref shift() ? :