Beefy Boxes and Bandwidth Generously Provided by pair Networks
"be consistent"
 
PerlMonks  

Re^2: RegEx Headaches

by oryx3 (Novice)
on Jun 19, 2013 at 18:59 UTC ( #1039828=note: print w/replies, xml ) Need Help??


in reply to Re: RegEx Headaches
in thread RegEx Headaches

Hmmm, interesting. Now I've got:

  DB<23> x $_
0  'ActionLogs.1.2.3.4.5.6.7.8.9.xml'

  DB<24> x /(\d+\.)/g
0  1.
1  2.
2  3.
3  4.
4  5.
5  6.
6  7.
7  8.
8  9.

[download]

but:

  DB<25> x /(\d+\.)+/g
0  9.

[download]

Can anyone tell me why the quantifier makes it match only the last group?

Replies are listed 'Best First'.
Re^3: RegEx Headaches
by kennethk (Abbot) on Jun 19, 2013 at 19:16 UTC
    The quantifier actually makes it match every group; however, it only stores the last match in $1, and thus that's what you see in your return. See Extracting matches in perlretut.

    If you want to extract an arbitrary number of digits sandwiched between decimal points, you can grab them all, and then split the result. 

    /((?:\d+\.)+)/g;
split /(?<=\.)/, $1;

    [download]
    Alternatively,
    [i]n list context, //g returns a list of matched groupings, or if there are no groupings, a list of matches to the whole regexp
    (see Global matching in perlretut) so you could try 
    my @res = /(?<=\.)\d+\./g;

    [download]

    #11929 First ask yourself `How would I do this without a computer?' Then have the computer do it the same way.

[reply]
[d/l]
[select]

In Section Seekers of Perl Wisdom

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?

www.com | www.net | www.org
Node Status?
node history
Node Type: note [id://1039828]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others avoiding work at the Monastery: (2)
As of 2023-09-26 13:07 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found
    Notices?