Zeile 6 holt alle Dateinamen mit dem ungefähr passenden Suchmuster in ein Array.
Zeile 10 schaut nochmal, ob das Suchmuster ganz genau passt und holt gleichzeitig das Datum vom Regex rüber in $date (was in meinem Beispiel $0, $1 und $2 war).
Zeile 11 holt die Punkte aus $date raus, somit wird z.B. aus 2011.01.09 ein 20110109 was ein nummerischer Wert ist.
Zeile 13 sagt next für den Fall, dass der Wert in $date (wie eben gebildet) nummerisch kleiner ist, also das Logfile zu alt für den gesuchten Zeitraum ist.
Man macht sich hier zunutze, dass man das Datum andersherum geschrieben (jahr, monat, tag) ganz einfach als einfachen nummerischen Wert vergleichen kann.
Zeile 14 schmeißt den gefundenen Dateinamen in ein weiteres Array für spätere Verwendung. Wir wissen ja nicht, was Du damit machen willst.

Edit: Next bedeutet, alle Befehle beginnend nach dem next bis zur schließenden geschweiften Schleifenklammer werden für diesen Durchlauf nicht ausgeführt, quasi übersprungen.

Edit2: Ich hatte Dir Date::Calc genannt, weil das wunderbare Möglichkeiten bietet und mir das ein guter Anlass zum Kennenlernen erschien. Nicht immer ist es nämlich so einfach, ein Datum mit einem anderen zu vergleichen :)
Last edited: 2011-01-09 18:28:57 +0100 (CET)