# daten rausschreiben print $fhout "$_$/" for @output;