unit System.Regexpr; {$DEFINE FPC_DOTTEDUNITS} {$i regexpr.pas}