Beefy Boxes and Bandwidth Generously Provided by pair Networks
Think about Loose Coupling
 
PerlMonks  

Answer: Double quotes within double quotes

by little_mistress (Monk)
on Apr 05, 2000 at 02:40 UTC ( #6895=categorized answer: print w/replies, xml ) Need Help??

Q&A > regular expressions > How can I find nested delimiters? - Answer contributed by little_mistress

I'm starting to get a little timid about posting on this site but im going to anyway
here goes

One thing to remeber about regular expressions in perl are that the charactors "*" and "+" are "greedy". In other words they will gobble up all the charactors they possibly can befor they fail. Hence the "*?" and "+?" constructions that make them "non-greedy" or rather they stop gobbling up charactors as soon as they make a match. so here is where greedy regular expressions come in handy

$text = "QUERY = \"SOME QUERY WITH \"\" (DOUBLE QUOTES)\" YEEHA"; $text =~ m/^(.*)"+\s(\w+)$/g; print "dollar one =$1\n\ndollar two = $2\n\n"; # $1 == QUERY = "SOME QUERY WITH "" (DOUBLE QUOTES) # $2 == YEEHA

Hope that helped

Just for fun try it like this and see what you get"

$text =~ m/^(.*)?"+\s(\w+)?$/g;

little_mistress@mainhall.com

Log In?
Username:
Password:

What's my password?
Create A New User
Chatterbox?
[hippo]: Loudest gig I can recall was Wolfsbane at the Astoria in the early 90s. Head rang for about 3 days afterwards. They were top, though.
[johngg]: My ears are still ringing!
Discipulus was outside The Clash concert in 1985..
[marto]: Wolfsbane , now I'm having flashbacks
[choroba]: Isn't Using PerlPod Creatively rather a meditation?
[choroba]: I don't see a question

How do I use this? | Other CB clients
Other Users?
Others examining the Monastery: (10)
As of 2017-03-24 12:10 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    Should Pluto Get Its Planethood Back?



    Results (301 votes). Check out past polls.