Zeit abfragen

[Stoffel84]

Hallo,

aus mehreren Codeschnipseln habe ich mir die Variable $ now wie folgt gebildet:

Code Auswählen Erweitern

my $now=sprintf("%%02d:%%02d",$hour,$min);

Eine Abfrage mit

Code Auswählen Erweitern

if  ($now gt "22:30")
schlug fehl, weshalb ich mir die Variable ins Log habe schreiben lassen:

2015.03.08 21:08:56 1: %02d:%02d

Ich habe miserable Perl Kenntnisse, kann mir jemand helfen?

Danke!

[Icinger]

Code Auswählen Erweitern

my $now=sprintf("%02d:%02d",$hour,$min);

Ein Prozentzeichen genügt

lg, Ici

[Stoffel84]

Danke! Nun erhalte ich wenigstens 00:00.

Ich habe die Funktion in einer eigenen MyUtils.pm geschrieben. Muss ich die TimeUtils einbinden? Wenn ja, wie?

[betateilchen]

Wo nimmst Du eigentlich $hour und $min her?

[Stoffel84]

Ähm ja, wenn du so frägst: keine Ahnung. Ich bin jetzt davon ausgegangen dass es globale Variablen sind. Zumindest habe ich in div. Beispielscripten keinen Anhaltspunkt gefunden der gegen meine Anahme sprach...

Wie komme ich an die Werte?

[Icinger]

zB so:

Code Auswählen Erweitern

($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime(time);

lg, Ici

[Stoffel84]

Super! Danke für Eure Hilfe!