my ($match) = $offbcimp =~ /test([^e]*(?:e(?!nd)[^e]*)*)end/; [download]
In reply to Re: simple regex question by JavaFan in thread simple regex question by pipeops