help with regexp.

[aswolff]

I need a regexp that can capture the following pattern?


ABCD123451 -
ZXD12ZX -
XBXBX -

I tried the following in my perl script but it is not capturing anything.

if ($line =~ /^\s{4}w{1,10)\s-/)
{
    print "$line\n";
}

Do I need to escape the hyphen in position 15?

Thanks.

 

[MillerH]

The regex that you included here doesn't even compile. Please try again, and repost when your regex at least compiles.

- Miller

 

[KevinADC]

w{1,10)

unless you are looking to match a literal 'w' you need a backslash in there: \w{1,10}

------------------------------------------
- Kevin, perl coder unexceptional!