"repeat" ruft eine übergebene Funktionsreferenz alle x Millisekunden auf. Der Autor scheint der Meinung zu sein, dass Tkx so etwas nicht besitzt (kann ich nichts zu sagen, ich habe Tkx noch nie benutzt).

Das wird so realisiert, dass "Tkx::after" eine anonyme Coderefenz übergeben wird ($repeater = sub {...} und Tkx::after(... , $repeater)) in der die an "repeat" übergebene Funktionsrefenz aufgerufen wird und danach ein neuer "Tkx::after" Aufruf erfolgt.