Perl: Datum hochzaehlen

[bert2002]

Hoi,

wie kann man den ein Datum *richtig* hochzaehlen lassen? Hab eine Variable (e.g. 1995-04-6) und will bis heute eine liste erhalten mit jedem datum. Geht das?

Danke! && MfG bert2002

[jan61]

Moin,

da gibt es diverse Wege, Perl hat einen ganzen Sack voll Funktionen zum Bearbeiten von "Datümern", schaust Du mal hier: http://perldoc.perl.org/index-functions-by-cat.html#Time-related-functions oder hier: http://search.cpan.org/search?query=Time&mode=all

Ein Weg wäre so:
- Du wandelst das Datum in Sekunden seit 1.1.1970 um mit dem Modul http://search.cpan.org/~drolsky/DateTime-0.4305/lib/DateTime.pm (http://search.cpan.org/%7Edrolsky/DateTime-0.4305/lib/DateTime.pm) ($dt->epoch)
- Dann zählst Du immer 86400 Sekunden dazu (1 Tag) und wandelst das mit localtime in ein Datum um
- Du stoppst, wenn Dein Sekunden-Wert größer oder gleich time() ist.

Jan