Professional Web Applications Themes

Pattern matching username - PERL Beginners

Is this doing what it is suppose to and how efficient? rule - valid chars A-z0-9 _ - . - cannot start with a digit - cannot start with a space - must be greater than 3 in length sub isValidChars { my ($z) = _; return length($z) > 3 && $z !~ /^[\d\s]/ && $z =~ /^[\w.]+$/ } thanks, -rkl...

  1. #1

    Default Pattern matching username

    Is this doing what it is suppose to and how efficient?

    rule
    - valid chars A-z0-9 _ - .
    - cannot start with a digit
    - cannot start with a space
    - must be greater than 3 in length

    sub isValidChars
    { my ($z) = _;
    return length($z) > 3 && $z !~ /^[\d\s]/ && $z =~ /^[\w.]+$/
    }

    thanks,
    -rkl
    perl@swanmail.com Guest

  2. #2

    Default RE: Pattern matching username

    That isn't quite right, you may get better milage with this...

    # untested
    if ($z =~ /^[a-zA-Z_\-\.][\w\-\.]{2,}$/) {
    # is ok
    }
    else {
    # failed
    }

    Yours should also work, except that...

    1. \s isn't needed in the first regex since a space would fail in the second
    regex anyway.

    2. You need to specify the dash (-), it isn't included in \w.

    Rob

    -----Original Message-----
    From: [email]perlswanmail.com[/email] [mailto:perlswanmail.com]
    Sent: Tuesday, September 30, 2003 1:30 PM
    To: [email]beginnersperl.org[/email]
    Subject: Pattern matching username


    Is this doing what it is suppose to and how efficient?

    rule
    - valid chars A-z0-9 _ - .
    - cannot start with a digit
    - cannot start with a space
    - must be greater than 3 in length

    sub isValidChars
    { my ($z) = _;
    return length($z) > 3 && $z !~ /^[\d\s]/ && $z =~ /^[\w.]+$/
    }

    thanks,
    -rkl

    --
    To unsubscribe, e-mail: [email]beginners-unsubscribeperl.org[/email]
    For additional commands, e-mail: [email]beginners-helpperl.org[/email]
    Rob Hanson Guest

Similar Threads

  1. pattern matching
    By Tad McClellan in forum PERL Beginners
    Replies: 30
    Last Post: June 23rd, 07:42 PM
  2. Pattern matching for xx-xx-xx string
    By jeff@nospam.com in forum PHP Development
    Replies: 7
    Last Post: January 19th, 06:38 PM
  3. Pattern Matching Operators
    By Prasad Karpur in forum PERL Beginners
    Replies: 2
    Last Post: October 5th, 04:21 PM
  4. matching the pattern (strings)
    By MJS in forum PERL Beginners
    Replies: 0
    Last Post: September 28th, 07:04 PM
  5. mysql Pattern Matching
    By Electroteque in forum PHP Development
    Replies: 3
    Last Post: September 4th, 03:30 PM

Bookmarks

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139