Wie im Logfile das Dezimaltrennzeichen Punkt gegen Komma ersetzen

[bajogger]

Ich habe einen Shelly Pro 3EM als Stromzähler im Einsatz.
Der Shelly zeigt in einem Reading "Total_Energy" den verbrauchten Strom. Dieses Reading schreibe ich in ein Logfile

Code Auswählen Erweitern

/opt/fhem/userlog/StromConsum.log StromZaehler:Total_Energy:.*Ursprünglich im Minutentakt. Das habe ich durch

Code Auswählen Erweitern

attr StromZaehler interval 3600auf stündlich geändert. Das Logfile importiere ich danach in ein Excelfile. Dabei ist das Dezimaltrennzeichen, Punkt, lästig.
Auf der Suche hier im Forum bin ich auf die Möglichkeit gestoßen ein Userreading zu erstellen das Komma verwendet.

Code Auswählen Erweitern

Total_Energi { my $val = (ReadingsVal("StromZaehler", "Total_Energy", 0)); $val =~ s/\./,/; return $val;}Funktioniert soweit auch. Das neue Reading (Total_Energi) zeigt nun das Komma als Trennzeichen.

Mein Problem:
Versuche jetzt das neue Reading zu loggen. Leider steht dies nun immer 3-5x im Logfile.
Das ursprüngliche Reading (Total_Energy) wurde sauber im Stundentakt geloggt.
Im Device werden beide Readings mit einem zeitlichen Abstand von 3Sek angezeigt.
Das eigentliche Reading immer z.B. 23:59:00 / Das umformatierte Userreading z.B. 23:59:03

Scheinbar wird dabei mehrfach das Loggen ausgelöst.
Weis jemand wie ich das verhindere bzw wie das besser/richtig mache. Kann man eventuell erst beim Loggen auf Komma formatieren

[RalfRog]

Das userreading wird mehrfach erzeugt weil ein Trigger fehlt, jetzt wird es bei jedem Event vom Device aktualisiert.

userReadings
Komma getrennte Liste von benutzerdefinierten Readings. Jede Definition hat folgendes Format:

    <reading>[:<trigger>] [<modifier>] { <perl code> }

Füge den entsprechenden Trigger für den Energiewert hinzu

Code Auswählen Erweitern

Total_Energi:Total_Energy { my $val = (ReadingsVal("StromZaehler", "Total_Energy", 0)); $val =~ s/\./,/; return $val;}

Zur Manipulation beim loggen kann ich nichts sagen.

[bajogger]

Danke, dein Hinweis leuchtet ein. Leider hat es nicht funktioniert.

um 22:59:00 wurde das Ursprungs Reading "Total_Energy" aktualisiert.
Das UserReading wurde aber nicht aktualisiert. Keine Reaktion

[betateilchen]

my $val = (ReadingsVal("StromZaehler", "Total_Energy", 0));

in rot = völlig sinnlose Klammern... wie kommt man auf sowas?

Das UserReading wurde aber nicht aktualisiert. Keine Reaktion

Natürlich nicht, die Syntax ist ja auch falsch. Lies die commandref, verstehe sie und mach es dann richtig.
Dann wird es auch funktionieren.

Code Auswählen Erweitern

attr StromZaehler userReadings Total_Energi:Total_Energy:.* {my $val = ReadingsNum($name, "Total_Energy", 0);; $val =~ s/\./,/;; return $val}


[betateilchen]

Warum man extra ein Logfile anlegt, in das nur jede Stunde ein Wert geschrieben wird, bleibt für mich ein Rätsel.

[bajogger]

Code Auswählen Erweitern

Internals:
  DEF        192.168.178.77
  FUUID      64e5db93-f33f-33ad-3303-72738819bd53140b
  INTERVAL  3600
  NAME      StromZaehler
  NR        343
  SHELLY    SPEM-003CEBEU
  SHELLYID  shellypro3em-3ce90e6e9ef0
  STATE      Zaehlerstand 159.5372 kWh / Tagesverbrauch 6.99 kWh
  TCPIP      192.168.178.77
  TYPE      Shelly
  eventCount 7932
  units      1
  OLDREADINGS:
  READINGS:
    2023-09-11 22:49:09  Active_Power_A  18.5 W
    2023-09-11 22:49:09  Active_Power_B  183.5 W
    2023-09-11 22:49:09  Active_Power_C  52.4 W
    2023-09-11 22:49:09  Active_Power_T  254.4 W
    2023-09-11 22:59:00  Active_Power_calculated 365.4 W ( 1314864 Ws = 365.24 Wh in 3598 s )
    2023-09-11 22:59:02  Active_Power_integrated 254.4  W
    2023-09-11 22:49:09  Apparent_Power_A 44 VA
    2023-09-11 22:49:09  Apparent_Power_B 284 VA
    2023-09-11 22:49:09  Apparent_Power_C 73 VA
    2023-09-11 22:49:09  Apparent_Power_T 402 VA
    2023-09-11 22:49:09  Current_A      0.195 A
    2023-09-11 22:49:09  Current_B      1.255 A
    2023-09-11 22:49:09  Current_C      0.326 A
    2023-09-11 22:49:09  Current_T      1.775 A
    2023-09-11 21:49:09  Power_Factor_A  0.63 (capacitive)
    2023-09-11 22:49:09  Power_Factor_B  0.74 (capacitive)
    2023-09-11 22:49:09  Power_Factor_C  0.77 (capacitive)
    2023-09-11 22:59:00  Purchased_Energy_A 22.4226 kWh
    2023-09-11 22:59:00  Purchased_Energy_B 85.8667 kWh
    2023-09-11 22:59:00  Purchased_Energy_C 51.3606 kWh
    2023-09-11 22:59:00  Purchased_Energy_T 159.6500 kWh
    2023-08-25 15:46:00  Returned_Energy_A 0.0 kWh
    2023-08-25 15:46:00  Returned_Energy_B 0.0 kWh
    2023-08-25 15:46:00  Returned_Energy_C 0.1128 kWh
    2023-08-25 15:46:00  Returned_Energy_T 0.1128 kWh
    2023-09-10 23:59:30  TagesVerbrauch  6.67330000000001
    2023-09-10 23:59:50  TagesVerbrauchKor 6.99 kWh
    2023-09-11 22:49:09  Total_Energi    159,1719 kWh
    2023-09-11 22:59:00  Total_Energy    159.5372 kWh
    2023-09-11 22:49:09  Voltage_A      227.3 V
    2023-09-11 22:49:09  Voltage_B      226.8 V
    2023-09-11 22:49:09  Voltage_C      226.8 V
    2023-09-11 00:00:00  VorTagsZaehler  151.9994 kWh
    2023-08-26 04:10:03  cloud          enabled(connected)
    2023-09-11 21:59:04  errors          OK
    2023-09-09 05:59:03  firmware        v0.14.1(update possible to v1.0.2-beta3)
    2023-09-11 21:59:04  inttemp        46.8 °C
    2023-09-07 14:59:02  network        <html>connected to <a href="http://192.168.178.77">192.168.178.77</a> (Wifi)</html>
    2023-09-07 13:58:35  network_disconnects 4
    2023-09-11 22:59:02  network_rssi    -74 dB
    2023-08-25 09:20:05  network_ssid    FRITZ!Box 7490
    2023-09-11 19:59:03  state          OK
    2023-09-11 22:59:02  timestamp      2023-09-11 22:59:02
    2023-09-11 20:59:03  webhook_cnt    0
    2023-09-11 20:59:03  webhook_ver    0
  helper:
    Energymeter_F 159537.15
    Energymeter_P 159649.98
    Energymeter_R 112.83
    a_Active_Power 18.5
    active_energy_last 365.24000000002
    b_Active_Power 183.5
    c_Active_Power 52.4
    power      0
    powerCnt  0
    timestamp_last 1694465942
Attributes:
  ShellyName StromZaehler
  group      Shelly
  interval  3600
  model      shellypro3em
  room      Favorit,Shelly
  showunits  normal2
  stateFormat Zaehlerstand Total_Energy / Tagesverbrauch TagesVerbrauchKor
  userReadings Total_Energi:Total_Energy { my $val = (ReadingsVal("StromZaehler", "Total_Energy", 0)); $val =~ s/\./,/; return $val;}

[bajogger]

Warum man extra ein Logfile anlegt, in das nur jede Stunde ein Wert geschrieben wird, bleibt für mich ein Rätsel.

Dadurch entsteht eine Textdatei (Logdatei) mit stündlichen Verbrauchswerten welche ich in Excel zur Weiterverarbeitung importiere

[bajogger]

Danke, alles funktioniert wie es soll. Userreading wird erzeugt und nur ein Eintrag im Logfile

[RalfRog]

Oh sorry, natürlich

Natürlich nicht, die Syntax ist ja auch falsch. Lies die commandref, verstehe sie und mach es dann richtig.
Dann wird es auch funktionieren.

Code Auswählen Erweitern

attr StromZaehler userReadings Total_Energi:Total_Energy:.* {my $val = ReadingsNum($name, "Total_Energy", 0);; $val =~ s/\./,/;; return $val}


Der Trigger wird als RegEx auf das Event interpretiert, da reicht der Readingname nicht.