regex problem

[Neema Salimi]

Syntax error on this; please help (unnecessary lines omitted).

String looked for is:  CA ARG 1 (then 3 numbers,can be negative, always have a decimal 
and digits after decimal)



while (<INFILE>) {

    if ($_ =~ /CA\s*ARG\s*1\s*(-*\d+\.\d+)\s*(-*\d+\.\d+)\s*(-*\d+\.\d+)/ {

         print "$1 $2 $3 \n";

    }

}




Neema Salimi
[EMAIL PROTECTED]