Thread Dateien nach 14 tagen löschen
(20 answers)
Opened by mobas at 2004-02-16 15:31
Eine einfach/kurze Moeglichkeit mit den Dateitest-Operatoren -M und -A:
Code: (dl
)
1 @files = <*>; Den Zeitstring koenntest du so in ein Epoche-Sekunden-Timestamp umwandeln: Code: (dl
)
1 my $filename = 'name.20040215135523'; um dann wie folgt zu errechnen ob die Datei das Alter erreicht hat und geloescht werden kann: Code: (dl
)
1 use Time::Local; Die Variante mit den Dateitest-Operatoren (-M & -A) solltest du nicht verwenden wenn dein Skript laengere Zeit laeuft, deren Ergebnis orientiert sich naemlich nach den Zeitpunkt an dem das Skript gestartet wurde (wenn ich mich nicht irre). Quote ein sprintf haett's auch getan ;) Gruss Christian. ,,Das perlt aber heute wieder...'' -- Dittsche
|