Re: Pattern Matching kills loops?

[Tobias Hoellrich]

Whooops, Steve,

I guess you should check whether your match is actually successful as in:

  if (/(\d+):([0-9,]*):(.*)/) {
        $id = $1;
        $temp = $2;
        $name = $3;
        $CAT{$id}{"name"} = $name;      
  } 

otherwise you get whatever $1/$2/$3 happen to be before the match. 

Hope this helps
  Tobias


At 09:06 PM 2/7/00 -0500, Steven Clark wrote:
>Hello everyone,
>
>       m/(\d+):([0-9,]*):(.*)/;        
>       $id = $1;
>       $temp = $2;
>       $name = $3;
>       
>       $CAT{$id}{"name"} = $name;      
>    }
>    close $fh;
>
> ...