Ich erstelle eine schnelle CSV-Datei aus einer MySQL-Tabelle mit einer Abfrage wie:

select DATE(date),count(date) from table group by DATE(date) order by date asc;

Speichern Sie sie dann direkt in einer Datei in Perl:

while(my($date,$sum) = $sth->fetchrow) { CSV „$date,$sumn“ drucken }

Allerdings gibt es Datumslücken in den Daten:

| 2008-08-05 | |. 2008-08-07 |. 23 |

Ich möchte die Daten auffüllen, fehlende Daten mit Null-Zählungseinträgen ergänzen und am Ende Folgendes erhalten:

| 2008-08-05 | |. 06.08.2008 | |. 2008-08-07 |. 23 |

Ich habe einen sehr umständlichen (mit ziemlicher Sicherheit fehlerhaften) Workaround zusammengeschustert, indem ich eine Reihe von Tagen im Monat und etwas Mathematik verwendet habe, aber es gibt definitiv einen direkteren Weg, entweder in MySQL oder Perl.

Irgendwelche genialen Ideen/Vorschläge, warum ich so dumm bin?

Am Ende habe ich mich aus mehreren Gründen für die Verwendung einer gespeicherten Prozedur zum Generieren einer temporären Tabelle zur Verarbeitung des erforderlichen Datumsbereichs entschieden:

• Ich kenne den Datumsbereich, nach dem ich jedes Mal suchen muss
• Leider kann dieser Server derzeit keine Perl-Module installieren und er ist in einem so schlechten Zustand, dass er nichts wie Date::-y installiert hat

Die Datums-/Uhrzeititeration in der Perl-Antwort ist auch sehr gut, ich wünschte, ich könnte mehrere Antworten auswählen!