Beefy Boxes and Bandwidth Generously Provided by pair Networks
go ahead... be a heretic
 
PerlMonks  

Re^4: Replace newlines only if not inside braces

by LanX (Canon)
on Feb 11, 2013 at 20:15 UTC ( #1018234=note: print w/ replies, xml ) Need Help??


in reply to Re^3: Replace newlines only if not inside braces
in thread Replace newlines only if not inside braces

$data =~ s<(?:{{.*?}}|[^\n])*\K\n>{<br>\n}gs;

I think (didn't test it) that the * is two greedy, better *?.

Cheers Rolf


Comment on Re^4: Replace newlines only if not inside braces
Download Code
Re^5: Replace newlines only if not inside braces
by trizen (Hermit) on Feb 11, 2013 at 21:47 UTC
    Nope. It doesn't matter. The group doesn't match a single newline, so it can be greedy. It will try to match either the brackets block or any other character which is not a newline. If it succeeds, then tries again to match the block or a non-newline character. If it fails, it will match the newline character (\n) and makes the replace.

    Using the non-greedy quantifier, will do the same thing, but a little bit slower because it needs, unnecessary, to look ahead after each repetition (theoretically).

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others chilling in the Monastery: (4)
As of 2015-07-06 03:31 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The top three priorities of my open tasks are (in descending order of likelihood to be worked on) ...









    Results (70 votes), past polls