On Sep 8, 2019, at 3:39 PM, Mike <te...@mflan.com> wrote: > > > It's probably best if you write a short script > that reads a __DATA__ section of data. > Then tell us what it does and what you expected > it to do. > > Off hand I don't see anything wrong with your regex, > but I don't know what you expect it to do. >
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. > > Mike > > > 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/