diff options
Diffstat (limited to 'httemplate/edit')
| -rw-r--r-- | httemplate/edit/process/qual.cgi | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/httemplate/edit/process/qual.cgi b/httemplate/edit/process/qual.cgi index 5a4f68be3..bc8c5a5fd 100644 --- a/httemplate/edit/process/qual.cgi +++ b/httemplate/edit/process/qual.cgi @@ -37,7 +37,9 @@ die "neither prospect nor customer specified or found" $cgi->param('exportnum') =~ /^(\d+)$/ or die 'illegal exportnum'; my $exportnum = $1; -$cgi->param('phonenum') =~ /^(\d*)$/ or die 'illegal phonenum'; +my $phonenum = $cgi->param('phonenum'); +$phonenum =~ s/\D//g; +$phonenum =~ /^(\d*)$/ or die 'illegal phonenum'; my $phonenum = $1; $cgi->param('locationnum') =~ /^(\-?\d*)$/ |