print CGI::header(-attachment=>'tabelle.csv',-type=>'text/csv');
binmode(STDOUT); # Muss nicht sein
print while CSV_wird_geneiert;