| line |
true |
false |
branch |
|
27
|
0 |
82 |
unless $q |
|
29
|
3 |
79 |
if (ref $q eq 'HASH') { } |
|
|
3 |
76 |
elsif (UNIVERSAL::isa($q, 'Hash::MultiValue')) { } |
|
39
|
0 |
77 |
unless ref $self |
|
46
|
65 |
102 |
ref $rule ? : |
|
47
|
65 |
102 |
ref $rule ? : |
|
49
|
9 |
158 |
if ($FormValidator::Lite::FileRules->{$rule_name}) |
|
53
|
8 |
159 |
if (not defined $_ && length $_ || $rule_name =~ /^(NOT_NULL|NOT_BLANK|REQUIRED)$/) { } |
|
56
|
9 |
150 |
if (my $file_rule = $FormValidator::Lite::FileRules->{$rule_name}) { } |
|
57
|
4 |
5 |
&$file_rule(@$args) ? : |
|
59
|
0 |
150 |
unless my $code = $FormValidator::Lite::Rules->{$rule_name} |
|
60
|
88 |
62 |
&$code(@$args) ? : |
|
64
|
67 |
100 |
if ($is_ok == 0) |
|
77
|
133 |
0 |
if %main::CGI:: |
|
80
|
15 |
118 |
if (ref $key) { } |
|
85
|
103 |
15 |
defined $q->param($key) ? : |
|
92
|
58 |
60 |
$self->{'_error'}{$key} ? : |
|
97
|
0 |
0 |
!$self->has_error ? : |
|
102
|
15 |
28 |
%{$self->{'_error'};} ? : |
|
120
|
1 |
9 |
$constraint =~ s/^\+// ? : |
|
142
|
0 |
6 |
unless $msg->{$key} |
|
149
|
0 |
1 |
ref $args[0] ? : |
|
151
|
0 |
1 |
unless $self->{'_msg'}{'message'} |
|
158
|
0 |
5 |
unless $self->{'_msg'} |
|
166
|
0 |
11 |
if exists $dup_check{"$param.$func"} |
|
171
|
4 |
1 |
wantarray ? : |
|
180
|
0 |
16 |
unless $msg |
|
186
|
5 |
11 |
if ($err_message) { } |
|
|
11 |
0 |
elsif ($err_function and $err_param) { } |
|
192
|
0 |
0 |
if ($msg->{'default_tmpl'}) { } |
|
216
|
1 |
2 |
if $target_param ne $param |
|
217
|
0 |
2 |
if exists $dup_check{"$param.$func"} |
|
222
|
1 |
0 |
wantarray ? : |