Question

I am not the greatest at regular expressions so translating them from one lang to another can be a daunting task.

tre = re.compile("///--STRING TEXT ONE. Ends with the word EDIT.(?:.*)--///(?:(?:.*\n))*///--END is the first word in STRING TEXT TWO--///")
result = tre.sub(motionBlur_text, configContents)

If you guys could help me move this to perl(which i hear is better for reg expressions) that would be really cool.

Answer 1

The regex in Perl is the same :

my $re = qr#///--STRING TEXT ONE. Ends with the word EDIT.(?:.*)--///(?:(?:.*\n))*///--END is the first word in STRING TEXT TWO--///#;