Hi all,
I'm trying to do some input validation and I'm pretty sure I'm doing something really stupid that's making it not work the way I want to.
I want to accept values from users that are of the form:
SB0 SB00
So, basically, it is a string "SB" or "sb" (case insensitive)followed by either 1 or two digits. Everything else should fail, and prompt the user to enter the right string. Here's the code I have right now. Not sure where I am going wrong:
our $sbNumHost1=''; while ($sbNumHost1 eq "") { print "Enter the SB## \t: "; chomp($sbNumHost1 = ReadLine(0)); if ($sbNumHost1 !~ m/(SB)(\d{1,2})/i) { print "matched >>>>>>>$&<<<<<<<\n"; $sbNumHost1 = ''; } } print "done\n";
Unfortunately, this code gladly accepts inputs like SB111 which should not be a valid input.
Helllllllppppuh
In reply to Noob Question - not sure what's wrong by vishi
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |