Re^5: Regex question

Those "ah cool, I didn't know about that" moments are one reason I hang out around here.

And you thought you were just going to get another set of eyes on your code....see Don't go all PerlMonks on me :-)

Comment on Re^5: Regex question - negatives

Replies are listed 'Best First'.
Re^6: Regex question - negatives by ultranerds (Hermit) on Jan 13, 2011 at 11:03 UTC
heheh yeah, me too! Don't know where I would be without people like you on perlmonks - has saved my sanity many many times ;) BTW - that code works a charm :) `my $re= qr{\[\[ # opening delimiter ( # capture... (?: # a group (?!\]\]) # that does not start with ]] . # and is a single character long )+ # and many of these groups, at least one. ) \]\] # closing delimiter }x; $section_contents =~ s{$re}{Process_Tag($1,$hidden_query,$tag_cfg, +$is_preview)}ge; # process stuff like [[1234]] or [[http://www.site.c +om]]` [download] Thanks again everyone! Cheers Andy	[reply] [d/l]

Replies are listed 'Best First'.

Re^6: Regex question - negatives
by ultranerds (Hermit) on Jan 13, 2011 at 11:03 UTC

    my $re= qr{\[\[            # opening delimiter
    (               # capture...
      (?:           # a group
        (?!\]\])    #    that does not start with ]]
        .           #    and is a single character long
      )+            # and many of these groups, at least one.
    )
    \]\]              # closing delimiter
    }x;    
    
    $section_contents =~ s{$re}{Process_Tag($1,$hidden_query,$tag_cfg,
+$is_preview)}ge; # process stuff like [[1234]] or [[http://www.site.c
+om]]
[download]

[reply]
[d/l]