Select Code to Download

my @typen = ("Befestigungsmaterial", "Ausbaumaterial", "Hls", "Install
+ation", "Profilholz", "Spanplatten", "Dachstuhlholz", "Deckenbalken",
+ "Wandelementholz", "Giebelbau", "Wandfertigung", "Individual");

### MAIN ###

excellent(@typen);

sub excellent{
    
    my $filename = cwd . "/" . "inventur.xls"; #dateiname
...
    $workbook->Close();
    $excel->Quit();        
}