Gtk->timeout_add($delay_in_ms,\&what_ever_sub_you_need);
main Gtk;