Wo ist SecondsTillTomorrow?

[betateilchen]

In fhem.pl gibts eine Forward-Deklaration

Code Auswählen Erweitern

sub SecondsTillTomorrow($);

und meine Hoffnung war, damit die Sekunden bis Mitternacht rauszufinden. Pustekuchen. Die Funktion scheint es nirgends zu geben. Es gibt wohl was ähnliches in 90_at.pm, aber damit bin ich auch nicht weitergekommen.

Drum hab ich mir mal schnell was für meine 99_myUtils gestrickt. Vielleicht kann es sonst noch jemand gebrauchen.

Code Auswählen Erweitern


sub secondsSinceMidnight(){
 my @time = localtime();
 return (($time[2] * 3600) + ($time[1] * 60) + $time[0]);
}

sub secondsToMidnight(){
 return 86400 - secondsSinceMidnight();
}



---

[rudolfkoenig]

Da SecondsTillTomorrow nur in at verwendet wurde, und nicht exakt das macht, was man eigentlich denkt, habe ich es vor kurzem nach 90_at.pm als at_SecondsTillTomorrow geschoben.

Jetzt habe ich die Referenz aus fhem.pl entfernt.

[betateilchen]

Danke für die Aufklärung.

Wo Du grade an den Deklarationen bist (ich will jetzt nicht extra einen neuen Thread aufmachen): Die für utf8ToLatin1($) fehlt.