You are not doing anything with $t to test whether
it works.  Also you are not telling us what data you
might test it with.


Mike


On 9/8/2019 6:41 PM, Jim Gibson wrote:
On Sep 8, 2019, at 3:39 PM, Mike <te...@mflan.com> wrote:

I expect it to return a positive value if $t contains a number anywhere within 
it and put that number in the $1 capture variable.



On 9/8/2019 4:34 PM, Jim Gibson wrote:
On Sep 8, 2019, at 1:30 PM, Gautam Desai <gautam.satya.de...@gmail.com> wrote:
Do you guys have any pointers ?
        $t =~ m{
                (               # capture matched number in $1
                  \d*   # match zero or more decimal digits
                  [05]  # followed by a '0' or '5'
                )               # end of capture
                (?:             # followed by either:
                  \D            # a non-digit
                |               # or
                  $             # the end of the string
                )
                }x

--
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/


Jim Gibson
j...@gibson.org


--
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/


Reply via email to