Beefy Boxes and Bandwidth Generously Provided by pair Networks
The stupid question is the question not asked
 
PerlMonks  

Re: regex help humbly sought

by Punitha (Priest)
on Mar 06, 2008 at 04:21 UTC ( #672352=note: print w/ replies, xml ) Need Help??


in reply to regex help humbly sought

Hi charlie_pi

you can try like this,

use strict; local $/;#####To read the whole content of a file while(<DATA>){ while($_=~/\(\!-- #BeginEditable \"([^"]*)" --\)(.*?)\(\!-- #EndEd +itable --\)/sgi){ print "IN:$1:$2\n"; ##do your stuffs here } }

Punitha


Comment on Re: regex help humbly sought
Download Code
Re^2: regex help humbly sought
by Anonymous Monk on Mar 06, 2008 at 05:26 UTC
    Punitha, you are a magician. I have made a donation to Perl Monks Foundation in your name, and I pledge also to study the regex you've written so that I can pass it on. Thank you for your timely help! Charlie Pi

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others taking refuge in the Monastery: (9)
As of 2014-09-18 23:47 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    How do you remember the number of days in each month?











    Results (127 votes), past polls