[Ifeffit] Tk/Perl