a) zu viele globale Variablen
b) ein open derselben Datei innerhalb einer Schleife ist praktisch immer falsch

c) bitte mit dem "Perl"-Button formatieren statt mit "Code"
d) zeitmangel -> kanns mir gerade nicht genauer ansehen