Added Integer test.
Change integer validation to reject strings like 123-456
This commit is contained in:
parent
22b7ec886b
commit
efb6e82140
2 changed files with 86 additions and 1 deletions
|
|
@ -100,7 +100,7 @@ Returns the integer from the form post, or returns 0 if the post result is inval
|
|||
sub getValueFromPost {
|
||||
my $self = shift;
|
||||
my $value = $self->session->form->param($self->get("name"));
|
||||
if ($value =~ /^[\d\-]+$/) {
|
||||
if ($value =~ /^-?\d+$/) {
|
||||
return $value;
|
||||
}
|
||||
return 0;
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue