I couldn't get it to work. Will the sub run as is? Is the :alpha: suppose to be there or replace it?
> On Thu, Oct 09, 2003 at 11:58:31PM -0700, [EMAIL PROTECTED] wrote: >> here's the rules: >> starts with alphanumeric >> 4 chars long >> require one period >> >> /^[a-zA-Z][\w\-\.]{3,}$/ > > I wouldn't try to do it with one regex. You can probably come > up with one, but the next time you have to read this code, you'll > wish you'd spelled out the three conditions individually. > > sub validate { > local $_ = shift; > return length == 4 # 4 chars long > and tr/.// == 1 # require one period > and /^[[:alpha:]]/ # starts with a letter > } > > -- > Steve > > -- > To unsubscribe, e-mail: [EMAIL PROTECTED] > For additional commands, e-mail: [EMAIL PROTECTED] > > ----------------------------------------- eMail solutions by http://www.swanmail.com -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]