Mein erstes kleines Modülchen...

[Struppi]

Wobei... die Elemente von localtime kann ich eigentlich »my-en«.

Joh, die meinte ich eigentlich auch. $VERSION muss sogar global deklariert werden, damit use Modul VERSION; funktioniert.

Dann brauchst du kein HASH für die Wochentag und Monatsnamen, da reichen einfach Arrays.

Sind Hashes denn so viel weniger performant? Ich arbeite gerne mit Hashes... ;)

Absolut, dir muss klar sein, dass die Schlüssel immer Strings sind, die bei jeder Operation verglichen werden müssen und Stringvergleiche sind immer langsamer als Zahlenvergleiche.

Und da du nicht mit Objekten arbeitest brauchst du die $today Parameter nie, d.h. du kannst sie wegschmeissen, entweder mit shift oder in dem du den wirklichen Parameter mit $_[1] abfragst.

Die werden an wenigen Stellen gebraucht, wenn eine Funktion den Rückgabewert einer anderen benötigt, z.B. in »sub rfc«:

Schon klar, dass wenn du das Objekt brauchst, dass dann der Parameter Sinn macht, wenn nicht, dann nicht.

Schöner Code, aber meine private leading_zero-Sub finde ich auch ganz nett ;)

auch wenn das bei Zeitfunktionen nicht unbedingt eine Rolle spielt, hast du das mal "gebenchmarked"? Ich schon.

Aber du hast Recht eine private Fuunktion ist ganze nett ;-)
Übrigens du kannst diese Funktion auch so aufrufen:

$leading_zero->( ... );

Das Und-Zeichen sieht unschön, finde ich.

[1] Das sind übrigens alle Date::-Module, die installiert sind:

Das meiste davon sind ja untermodule von Date::Calc. du hast Date::Calc, Date::Calendar und Date::Format
(wobei ich den Sinn dieses Moduls nicht sehe, das kann POSIX alles schon)

Struppi.