| Subject: | Bug in Validation::Class::Directive::Between |
| Date: | Wed, 4 May 2016 11:26:49 +0530 |
| To: | <bug-Validation-Class [...] rt.cpan.org> |
| From: | Vanitha <vanitha [...] exceleron.com> |
Hi Al Newkirk,
Please refer the line mentioned in the link:
https://metacpan.org/source/AWNCORP/Validation-Class-7.900057/lib/Validation/Class/Directive/Between.pm#L42
Line referred to in the link: my $value = length($param);
From the pod,
my $rules = Validation::Class::Simple->new(
fields => {
person_age => {
between => '18-95'
}
}
);
If person_age is 19, this module will fail since it is checking for length of param(which is input '19') and will always throw Validation error.
Patch:
unless ( $param >= $min && $param <= $max ) {
$self->error(@_, "$min-$max");
}
Distribution: Validation-Class-7.900057
Perl: 5.10
OS: CentOS 6.7
Regards
Vanitha T
Show quoted text
________________________________
Confidentiality Notice: This e-mail and its contents contain information that is proprietary and confidential to Exceleron Software, LLC. and that may also be privileged. Any review, use, disclosure, distribution or reproduction of this email or its contents by anyone other than an authorized recipient is prohibited and may be unlawful. If you are not an authorized recipient, please immediately notify me, permanently delete this message from your system and destroy any copies thereof, including any attachments. Thank you.