oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Altered regex to allow '+' in email address

Browse source
This commit is contained in:
Nik Ogura 2007-03-31 21:24:29 +00:00
parent ba3eedf4a7
commit a91bc9c154
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
lib/WebGUI/Form/Email.pm
View file

@ -79,7 +79,7 @@ Returns a validated email address. If the result does not pass validation, it re
sub getValueFromPost { sub getValueFromPost {
my $self = shift; my $self = shift;
my $value = $self->session->form->param($self->get("name")); my $value = $self->session->form->param($self->get("name"));
if ($value =~ /^([0-9a-zA-Z]([-.\w]*[0-9a-zA-Z])*@([0-9a-zA-Z][-\w]*[0-9a-zA-Z]\.)+[a-zA-Z]{2,9})$/i) { if ($value =~ /^([0-9a-zA-Z]([-.+\w]*[0-9a-zA-Z])*@([0-9a-zA-Z][-\w]*[0-9a-zA-Z]\.)+[a-zA-Z]{2,9})$/i) {
return $value; return $value;
} }
return undef; return undef;