line | % | coverage | branch |
14 | 100 | T | F | ref $_[0] eq 'HASH' ? : |
27 | 100 | T | F | eval {
do {
$super->can('constraints')
}
} ? : |
73 | 100 | T | F | if (ref $constraint_expression eq 'ARRAY') |
80 | 100 | T | F | if (ref $constraint_expression eq 'CODE') { } |
86 | 100 | T | F | if ($constraint_expression =~ /^\@(.+)$/) |
91 | 50 | T | F | if $constraint_expression =~ /\W/ |
98 | 100 | T | F | unless ref $constraint_function eq 'CODE' |
105 | 100 | T | F | if ($$data_type{'array'}) { } |
106 | 100 | T | F | ref $$hash{$key} eq 'ARRAY' ? : |
110 | 100 | T | F | unless $is_valid |
112 | 100 | T | F | if (my $key = $$options{'result'}) |
120 | 100 | T | F | ref $key eq 'ARRAY' ? : |
125 | 100 | T | F | if ($is_valid and $$options{'result'}) |
131 | 100 | T | F | unless ($is_valid) |
133 | 100 | T | F | unless $error_stock |