timelocal() & monatsende...

[electromusik]

Hallo Members,

leider hab ich noch nicht also viel ahnung von perl zumindst nicht in diesem bereich :)

folgendes problem:

vom aktuellen tag welcher über timelocal() geholt wird eine kleine liste generiert (gestern | heute | morgen) was ja kein problem ist...
wenn jetzt heute der 31. wäre ja dann morgen der 01. (wenn nix dazwischen kommt *G*)

-> soweit so gut

nur weis ja das script nicht das nachdem 31. der 01. kommt...

wenn ich jetzte die monate definieren würde in etwa so:

%month_end = (
 1 => 31,
 2 => 28,
 3 => 31,
 4 => 30,
 5 => 31,
 6 => 30,
 7 => 31,
 8 => 31,
 9 => 30,
 10 => 31,
 11 => 30,
 12 => 31,
);

--> da bräuchte ich noch was, damit beim schaltjahr der 29.02. existiert, aber das erstmal bei seite

wie müsste die routine aussehen das er dann
beim ende des monats mit dem 01. anfängt...

Vielen Dank für eure Hilfe :)