12^(((class[ ]+)?(procedure|function)|constructor|destructor|interface|implementation|initialization|finalization).*)$^(.*=[ ]*(class|record).*)$