if ($zeile =~ /^(\d{2})\:(\d{2})\:(\d{2})/ ) {
	if (($1 ge 7) && ($1 lt 18 )) {
#	if (($1 => 7) && ($1 < 18 )) {