in reply to Thread in perl

See Tk-with-worker-threads