Beefy Boxes and Bandwidth Generously Provided by pair Networks
Don't ask to ask, just ask
 
PerlMonks  

Re^4: grep trouble (body of flip-flop range)

by LanX (Canon)
on Apr 17, 2011 at 16:21 UTC ( #899823=note: print w/ replies, xml ) Need Help??


in reply to Re^3: grep trouble
in thread grep trouble

Thanks!

IMHO sounds like far less than 1‰ of all CPAN modules might rely on this.


UPDATE:

OK found another use-case, I just recently had the need in my ORG-Parser to distinguish the range delimiters and the range "body" with a flip-flop-operator, like for ORG's "BEGIN/END"-blocks.

This can be simplified (i.e. more DRY), if one has access to the last successful pattern:

DB<114> for(0..99) {print if (/10/../20/ and not //)} 111213141516171819 DB<115> for(0..99) {print if (/10/../20/)} 1011121314151617181920 DB<116> for(0..99) {print if (/10/../20/ and //)} 1020

I think that's a more frequent application, I even slightly remember seeing it in Friedl's book.

But I'd rather prefer an explicit special varą, something like $PATTERN or $&& (in analogy to $MATCH resp. $&) .

Cheers Rolf

1) an special var has the advantage that the regex itself can be accessed, e.g. printed.


Comment on Re^4: grep trouble (body of flip-flop range)
Select or Download Code

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://899823]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others contemplating the Monastery: (14)
As of 2014-08-20 14:14 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The best computer themed movie is:











    Results (115 votes), past polls