[gelöst] ReadingsTimestamp formatieren?

[andies]

Guten Abend, kurze Anfängerfrage: Gibt es einen Befehl, mit dem man ein ReadingsTimestamp formatieren kann? Ich dachte an

Code Auswählen Erweitern

{return strftime('%k:%M %A (%d.%b)', ReadingsTimestamp($name, "state", ""))}
das ergibt aber die Fehlermeldung

Code Auswählen Erweitern

Error evaluating Klingel stateFormat: Usage: POSIX::strftime(fmt, sec, min, hour, mday, mon, year, wday = -1, yday = -1, isdst = -1) at (eval 204225) line 1.

Für einen Link, mit welchem Befehl das geht, wäre ich dankbar. Oder muss man das "mit der Hand stricken"? Die SuFu hat unter "ReadingsTimestamp formatieren" auch nichts ergeben.

[DeeSPe]

z.B. so:

Code Auswählen Erweitern

{
  ReadingsTimestamp($name,"state","") =~ /^(\d+)-(\d+)-(\d+)\s(\d+:\d+):(\d+)$/;
  return "Datum: $3.$2.$1, Uhrzeit: $4";
}

Gruß
Dan

[andies]

Danke!


Gesendet von iPad mit Tapatalk Pro

[Frank_Huber]

Ich verstehe hier gerade nur Bahnhof. Kann einer vielleicht ein "vorher / nachher" Vergleich posten?

Gesendet von meinem S3_32 mit Tapatalk

[DeeSPe]

Vorher:

Code Auswählen Erweitern

2017-08-17 01:20:54

Nachher:

Code Auswählen Erweitern

Datum: 17.08.2017, Uhrzeit: 01:20

Gruß
Dan

[andies]

Ich kann jetzt präziser sagen, was ich eigentlich wollte. Ich möchte statt eines Tages nur den Wochentag und die Uhrzeit ohne Sekunden anzeigen. Ich mache das jetzt so:

Code Auswählen Erweitern


sub WeekdayAndTimeFromTimestamp($){
    my ($TimeStamp) = $_[0];
    my @days = qw/Son Mon Die Mit Don Fre Sam/;
    $TimeStamp =~ /^(\d+)-(\d+)-(\d+)\s(\d+:\d+):(\d+)$/;
    my $wday = $days[(localtime(timelocal(0,0,0,$3,$2-1,$1-1900)))[6]];
    return "$wday $4";
}

und diese Funktion wird einfach auf den ReadingsTimestamp angewandt. Sieht dann so wie im Anhang aus.

[choetzu]

{
  ReadingsTimestamp($name,"state","") =~ /^(\d+)-(\d+)-(\d+)\s(\d+:\d+)\d+)$/;
  return "Datum: $3.$2.$1, Uhrzeit: $4";
}


Vorher:

Code Auswählen Erweitern

2017-08-17 01:20:54

Nachher:

Code Auswählen Erweitern

Datum: 17.08.2017, Uhrzeit: 01:20

Gruß
Dan

Hallo, das ist super, hilft weiter. Wie mache ich aber aus 2017 ein 17?

lg c

[betateilchen]

Hallo, das ist super, hilft weiter. Wie mache ich aber aus 2017 ein 17?

2000 abziehen...

[choetzu]

Achso, jetzt bin ich schlauer danke für die Super Hilfe.. müsste also wie folgt gehen

Code Auswählen Erweitern

{
  ReadingsTimestamp($name,"state","") =~ /^(\d+)-(\d+)-(\d+)\s(\d+:\d+):(\d+)$/;
  return "Datum: $3.$2.$1[b](minus 2000 abziehen gemäss Betateilchen)[/b], Uhrzeit: $4";
}



Ernsthaft. Ich weiss dass $1 fürs Jahr steht und aus (\d+) genommen wird. Ich möchte aber nur die 2 letzten Zahlen.aber das wars schon...

[DeeSPe]

Code Auswählen Erweitern

ReadingsTimestamp($name,"state","") =~ /^20(\d+)-(\d+)-(\d+)\s(\d+:\d+):(\d+)$/;

Gruß
Dan

[betateilchen]

Code Auswählen Erweitern


  return "Datum: $3.$2.$1[b](minus 2000 abziehen gemäss Betateilchen)[/b], Uhrzeit: $4";


das war doch schon fast richtig. Einfach noch die richtige perl Syntax und alles wird gut.

Code Auswählen Erweitern

return "Datum: $3.$2.".$1-2000.", Uhrzeit: $4";

[choetzu]

Beides klappt hervorragend! Und ich dachte -2000 wär ein Witz   danke, ich versteh es auch jetzt.

Gibt es eigentlich eine Möglichkeit den Timestamp generell standartmässig im FEHM zu ändern? Oder ginge dann nix mehr?

[Wzut]

Hm, hm ... aber mit beiden Lösung kommst du in knapp 82 Jahren doch wieder hier her weil dann wieder die Ausgabe nicht passt ... (duck und weg)

[CQuadrat]

Nun, man könnte den Regex abändern in:

Code Auswählen Erweitern

^(\d\d)(\d\d)-(\d+)-(\d+)\s(\d+:\d+):(\d+)$

Dann ist das Jahr in $1$2 und $2 entspricht den letzten beiden Ziffern.

Dann ist das auch Y2K1C tauglich 


Nachtrag: Allerdings verschiebt es das Problem nur um weitere 7900 Jahre.

[betateilchen]

aber mit beiden Lösung kommst du in knapp 82 Jahren doch wieder hier her weil dann wieder die Ausgabe nicht passt ...

Nachtrag: Allerdings verschiebt es das Problem nur um weitere 7900 Jahre.

ok, ok...

Code Auswählen Erweitern

return "Datum: $3.$2.".substr($1,length($1)-2,2).", Uhrzeit: $4";

übrigens ist substr() ressourcenschonender als das ganze regex-Gedöns.