- Timestamp:
- 06/16/16 17:55:53 (8 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/cgi-bin/main.cgi
r883 r884 1020 1020 $webvar{vlan} =~ s/^\s+//; 1021 1021 $webvar{vlan} =~ s/\s+$//; 1022 # Then any surrounding a comma 1023 $webvar{vlan} =~ s/\s*,\s*/,/g; 1022 1024 # ... ve make it ze configurable thingy! 1023 1025 if ($IPDB::numeric_vlan) { 1024 if ($webvar{vlan} !~ /^ \d+$/) {1026 if ($webvar{vlan} !~ /^[\d,-]+$/) { 1025 1027 $page->param(err => "VLANs must be numeric"); 1026 1028 return; 1027 1029 } 1028 1030 } else { 1029 if ($webvar{vlan} !~ /^[\w\d_. -]+$/) {1031 if ($webvar{vlan} !~ /^[\w\d_.,-]+$/) { 1030 1032 $page->param(err => "VLANs must be alphanumeric"); 1031 1033 return;
Note:
See TracChangeset
for help on using the changeset viewer.