Casandro: Zur Info: Aktuelle Kalenderwoche in Perl berechnen

Beitrag lesen

Hallo Leute,

ich hoffe es verstößt nicht gegen die Regel, nur eine Lösung zu präsentieren, aber ich als Perl-Anfänger habe verzweifelt nach einer Lösung zur Berechnung der aktuellen Kalenderwoche gesucht.

Da ich nicht auf Anhieb was gefunden habe, dachte ich, ich teile meine Erkenntnisse mit anderen Anfängern:

$day_of_year = (localtime(time()))[7];
  $week_of_year = int($day_of_year / 7)+1;
  # +1 ist nötig, da die Kalenderwoche IT-gerecht bei 0 anfängt

Eine Frage stellt sich mir dann aber doch noch:
Fängt die Woche in Perl mit Sonntag oder Montag an? Ich habe da doch wiedersprüchliches gelesen.

Grüße,
Björn

Das sitimmt aber nicht ganz, da die erste KW manchmal im Vorjahr, und manchmal im Januar anfängt (Ich schau aber nochmal nach wies genau geht)