my ($zahl) = $zeile =~ /\s+(\d+)\s+">/