Tk::Listbox,perldoc $listbox->delete(first, ?last?)
Deletes one or more elements of the listbox. First and last are indices specifying the
first and last elements in the range to delete. If last isn't specified it defaults to
first, i.e. a single element is deleted.
Dein Script sieht aus, als wuerdest Du kein
strict verwenden. Ausserdem verstehe ich nicht ganz den Sinn der ersten Schleife, weil Du da ueber ein leeres Array iterierst.