| line |
true |
false |
branch |
|
29
|
0 |
17 |
unless (ref $form) |
|
30
|
0 |
0 |
$charset ? : |
|
39
|
24 |
16 |
if (grep {$_ eq $type;} 'hidden', 'checkbox', 'radio', 'submit', 'image') |
|
43
|
2 |
38 |
if ($tag->tag eq 'select') |
|
49
|
1 |
39 |
if ($type eq 'number') |
|
51
|
1 |
0 |
if (my $val = $tag->attr->{'min'}) |
|
54
|
1 |
0 |
if (my $val = $tag->attr->{'max'}) |
|
59
|
33 |
7 |
unless (exists $tag->attr->{'disabled'}) |
|
60
|
19 |
8 |
if ($type ne 'submit' and $type ne 'image' and $type ne 'checkbox' and $type ne 'radio' || exists $tag->attr->{'checked'}) |
|
66
|
2 |
38 |
if (exists $tag->attr->{'maxlength'}) |
|
70
|
2 |
38 |
if (exists $tag->attr->{'required'}) |
|
74
|
1 |
39 |
if (exists $tag->attr->{'pattern'}) |
|
88
|
0 |
44 |
unless (blessed $params and $params->isa('Mojo::Parameters')) |
|
91
|
0 |
0 |
if (blessed $params and $params->isa('Hash::MultiValue')) { } |
|
101
|
44 |
0 |
unless ($$schema{$TERM_ADD_PROPS}) |
|
103
|
2 |
67 |
unless $$props{$name} |
|
110
|
51 |
30 |
if (($$props{$name}{$TERM_REQUIRED} || '') eq 'Mojo::JSON'->true) |
|
111
|
3 |
48 |
unless scalar @params |
|
114
|
42 |
36 |
if (my $allowed = $$props{$name}{$TERM_OPTIONS}) |
|
117
|
7 |
17 |
unless grep {$_ eq $given;} @$allowed |
|
120
|
5 |
66 |
if (exists $$props{$name}{$TERM_MAXLENGTH}) |
|
122
|
2 |
3 |
if length $given > $$props{$name}{$TERM_MAXLENGTH} |
|
126
|
2 |
67 |
if (defined $$props{$name}{$TERM_MIN_LENGTH}) |
|
128
|
1 |
1 |
if length $given < $$props{$name}{$TERM_MIN_LENGTH} |
|
132
|
5 |
63 |
if (my $pattern = $$props{$name}{$TERM_PATTERN}) |
|
134
|
4 |
1 |
unless $given =~ /\A$pattern\Z/ |
|
138
|
6 |
58 |
if (($$props{$name}{$TERM_TYPE} || '') eq $TERM_NUMBER) |
|
140
|
1 |
5 |
unless $given =~ /\A[\d\+\-\.]+\Z/ |
|
142
|
5 |
0 |
if (my $min = $$props{$name}{$TERM_MIN}) |
|
143
|
1 |
4 |
if $given < $min |
|
145
|
4 |
0 |
if (my $max = $$props{$name}{$TERM_MAX}) |
|
146
|
2 |
2 |
if $given > $max |