Step-by-step interactive process in Perl/Tk