Re: regex require a period

[Steve Grazzini]

On Fri, Oct 10, 2003 at 12:49:51AM -0700, [EMAIL PROTECTED] wrote:
> I couldn't get it to work.

Whoops -->

  sub validate {
    local $_ = shift;
    return( length == 4 and
            tr/.// == 1 and
            /^[[:alpha:]]/ )
  }

-- 
Steve

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]