my ($match) = $offbcimp =~ /test([^e]*(?:e(?!nd)[^e]*)*)end/;