regex101: PCRE (Legacy) Match Workspace

Pro

\ban ASCII word boundary

exceptthe literal text except (case sensitive)

\s*any whitespace character, repeated any number of times

\r?optionally matches a carriage return (ASCII 13)

\na line-feed (newline) character (ASCII 10)

Non-Capturing Group(?:(?!(?:except|[\t ]+raise;)$).*\r?\n)*

*repeats the group contents below any number of times:

Negative Lookahead(?!(?:except|[\t ]+raise;)$)

Non-Capturing Group(?:except|[\t ]+raise;)

1st Alternativeexcept

exceptthe literal text except (case sensitive)

2nd Alternative[\t ]+raise;

Character Class[\t ]+

+matches at least one character from the set below:

\ta tab character (ASCII 9)

the literal (32₁₀ / 40₈ / 20₁₆)

raise;the literal text raise; (case sensitive)

$end of line

.*any character (except for line terminators), repeated any number of times

\r?optionally matches a carriage return (ASCII 13)

\na line-feed (newline) character (ASCII 10)

end;the literal text end; (case sensitive)

Global pattern flags

g modifier: global. Finds all matches instead of stopping after the first

m modifier: multiline. Causes ^ and $ to match the start and end of each line, not only the start and end of the string

25 tokens

Regular Expression

\bexcept\s*\r?\n(?:(?!(?:except|[\t ]+raise;)$).*\r?\n)*end;

New

except
  FreeAndNil(result);
end;

except
  FreeAndNil(result);
end;


except
  FreeAndNil(result);
  raise;
end;

except
  FreeAndNil(result);
  raise;
end;

except
  FreeAndNil(result);
end;


except
  FreeAndNil(result);
  raise;
end;

Extraction

except
  FreeAndNil(result);
end;

except
  FreeAndNil(result);
end;


except
  FreeAndNil(result);
  raise;
end;

except
  FreeAndNil(result);
  raise;
end;

except
  FreeAndNil(result);
end;


except
  FreeAndNil(result);
  raise;
end;