open(XLS, ">>$log/test2.xls") or die $!;  #speichert
    print XLS "@erste_Zeile";
    print XLS "@zweite_Zeile";