probably what you wanted is:

($row, $col) = /(\d+)/g;

> -----Original Message-----
> From: Jerry Preston [mailto:[EMAIL PROTECTED]]
> Sent: Friday, August 16, 2002 4:49 PM
> To: Connie Chan; Beginners Perl
> Subject: RE: another reg needed
> 
> 
> Connie,
> 
> This is what I am looking for!  But all I get is','.
> 
> Thanks,
> 
> Jerry
> 
> -----Original Message-----
> From: Connie Chan [mailto:[EMAIL PROTECTED]]
> Sent: Friday, August 16, 2002 3:34 PM
> To: [EMAIL PROTECTED]; Beginners Perl
> Subject: Re: another reg needed
> 
> 
> > $_ = "Die,Row 0, Column 12"
> 
> do you trying to get this ?
> 
> my ($row, $col) = ($1, $2) =~ m/^.+(\d+).+(\d+)$/;
> # $row = 0;
> # $col = 12;
> 
> /^ means beginning of line
> ..+ means anything
> \d+ means 1 more more digit numbers
> (xxx) capture matched values within blankets in order to $1, $2...$x.
> $/ means the end of the line.
> 
> > 
> > What I want is the 0 and 12.  What about the text?
> > 
> 
> So what do you want to deal with the text ? 
> 
> Rgds,
> Connie
> 
> 
> -- 
> To unsubscribe, e-mail: [EMAIL PROTECTED]
> For additional commands, e-mail: [EMAIL PROTECTED]
> 

----------------------------------------------------------------------------
--------------------
The views and opinions expressed in this email message are the sender's
own, and do not necessarily represent the views and opinions of Summit
Systems Inc.


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

Reply via email to