Opened by krusty at 2007-04-20 15:46
User since
2003-08-04
2145 Artikel
ModeratorIn + EditorIn
2003-08-04
2145 Artikel
ModeratorIn + EditorIn
Ich würd's vielleicht mit Date::Manip machen, wie von renee gezeigt.
Wenn es Date::Calc sein soll, geht es natürlich etwas einfacher als bisher mit der Hin- und Her-Rechnerei gezeigt:
Wenn das Skript nicht am ersten, sondern am letzten Tag eines Monats ausgeführt werden sollte, müsste aber erst spezifiziert werden, was genau "einen Monat zurückrechnen" bedeutet: Ist "einen Monat zurück" vom 31. Juli jetzt der 30. Juni oder der 1. Juli? Den 31. Juni gibt es ja nicht...
Wenn es Date::Calc sein soll, geht es natürlich etwas einfacher als bisher mit der Hin- und Her-Rechnerei gezeigt:
Code: (dl
)
1
2
3
4
5
use strict;
use warnings;
use Date::Calc qw(Today Add_Delta_YM Mktime Now);
print Mktime(Add_Delta_YM(Today, 0, -1), Now);
Wenn das Skript nicht am ersten, sondern am letzten Tag eines Monats ausgeführt werden sollte, müsste aber erst spezifiziert werden, was genau "einen Monat zurückrechnen" bedeutet: Ist "einen Monat zurück" vom 31. Juli jetzt der 30. Juni oder der 1. Juli? Den 31. Juni gibt es ja nicht...