Re: regex help humbly sought

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
    }
}
[download]

Punitha

In Section Seekers of Perl Wisdom