my @spalten = unpack("A20 A5 A10 A40", $zeile);