$semi_count += () = m{;(?!\s*End)}g;