$zeile =~ m/^# Number Of Points: (\d+(?:\.\d+)?)$/; $zahl = $1;