Ich kenne mich mit Tk leider kaum aus, habe auch dein Skript nur kurz überflogen, aber wäre es nicht einfacher das Ganze mit Tk::Table zu machen?