# Hier wird der Kalender zusammengebaut
 for($row = 1; $row <= 6; $row ++){
  $table .= "<tr>\n";
   for(0..6){
    $y_day = $x_day;
    &day;
    # Der aktuelle Tag wird farbig angezeigt
    if ($datum eq "$y_day.$month.$year"){
       $daycolor = "klink";
    }else{
       $daycolor = "link";
    }
    if (grep {$x_day==$_} @test){
       $classkal = "kalender_bg";
    }else{
       $classkal = "kalender";
    }
    # ENDE Der aktuelle Tag wird farbig angezeigt
    if( $first_day <= $_ and $row == 1){ # Einstieg in Kalender
     $table .= "<td class=$classkal><span class=fontkal><a href=\"$cgi_path/event.cgi?rdate=$y_day.$month.$year\" class=$daycolor style=\"text-decoration:none\"><b>$x_day</b></a></span></td>\n";
     $x_day++;
    }
    elsif( $x_day <= $days and $row != 1){
     $table .= "<td class=$classkal><span class=fontkal><a href=\"$cgi_path/event.cgi?rdate=$y_day.$month.$year\" class=$daycolor style=\"text-decoration:none\"><b>$x_day</b></a></span></td>\n";
     $x_day++;
    }
    else{  # Tag stimmt nicht überein
     $table .= "<td class=\"kalender\">&nbsp;</td>\n";
    }
   }
  $table .= "</tr>\n";
 }