[gelöst] Frage zu Ersatzwert von Readingsval

Begonnen von TomLee, 15 Juni 2018, 15:43:48

Vorheriges Thema - Nächstes Thema

Beta-User

Da es ja egal ist, wenn eventuell eine leere Liste erstellt wird, kannst du auch einfach eval() verwenden:
ZitatEcho:list_SHOPPING_ITEM:.* { eval ( FileWrite({FileName=>"/tmp/einkaufsliste.txt", ForceType=>"file"}, split(/\,/,$EVTPART1)) )}
Server: HP-elitedesk@Debian 12, aktuelles FHEM@ConfigDB | CUL_HM (VCCU) | MQTT2: MiLight@ESP-GW, BT@OpenMQTTGw | MySensors: seriell, v.a. 2.3.1@RS485 | ZWave | ZigBee@deCONZ | SIGNALduino | MapleCUN | RHASSPY
svn: u.a MySensors, Weekday-&RandomTimer, Twilight,  div. attrTemplate-files

TomLee

Mit einem Danke ist das gar nich mehr Wert zu schätzen. Klappt.

Es bleibt aber bei einem Logeintrag:

2018.07.19 16:05:50 1: PERL WARNING: Use of uninitialized value in eval "string" at (eval 1757758) line 1.
2018.07.19 16:05:50 3: eval: my $NAME='Echo';my $TYPE='echodevice';my $EVTPART0='list_SHOPPING_ITEM:';my $EVTPART1='allianz,fernbedienung,eis,eis,baileys,blumen';my $SELF='not_Echo_Einkaufsliste';my $EVENT='list_SHOPPING_ITEM: allianz,fernbedienung,eis,eis,baileys,blumen';{ eval ( FileWrite({FileName=>"/tmp/einkaufsliste.txt", ForceType=>"file"}, split(/\,/,$EVTPART1)) )}


Mir ging's ja zwischenzeitlich such darum keine Logeinträge zu haben.
Kann auch auf verbose 0 stellen !?.

Beta-User

mach doch das ", NoNL => 0" auch noch rein; ich kann im Moment nicht sagen, an es daran hängt, aber eigentlich will fileWrite in der von dir gewählten Form auch diese Angabe...

Ansonsten sollte man Logeinträge vermeiden, nicht unterdrücken ;) .
Server: HP-elitedesk@Debian 12, aktuelles FHEM@ConfigDB | CUL_HM (VCCU) | MQTT2: MiLight@ESP-GW, BT@OpenMQTTGw | MySensors: seriell, v.a. 2.3.1@RS485 | ZWave | ZigBee@deCONZ | SIGNALduino | MapleCUN | RHASSPY
svn: u.a MySensors, Weekday-&RandomTimer, Twilight,  div. attrTemplate-files

TomLee

Bleibt dabei.

Echo:list_SHOPPING_ITEM:.* { eval ( FileWrite({FileName=>"/tmp/einkaufsliste.txt", ForceType=>"file", NoNL => 0 }, split(/\,/,$EVTPART1)) )}


2018.07.19 17:31:55 1: PERL WARNING: Use of uninitialized value in eval "string" at (eval 1768537) line 1.
2018.07.19 17:31:55 3: eval: my $SELF='not_Echo_Einkaufsliste';my $EVENT='list_SHOPPING_ITEM: eis';my $EVTPART1='eis';my $EVTPART0='list_SHOPPING_ITEM:';my $TYPE='echodevice';my $NAME='Echo';{ eval ( FileWrite({FileName=>"/tmp/einkaufsliste.txt", ForceType=>"file", NoNL => 0 }, split(/\,/,$EVTPART1)) )}

Beta-User

...dann habe ich erst mal keine weitere Idee, wie man die Meldung wegbekommt...
Server: HP-elitedesk@Debian 12, aktuelles FHEM@ConfigDB | CUL_HM (VCCU) | MQTT2: MiLight@ESP-GW, BT@OpenMQTTGw | MySensors: seriell, v.a. 2.3.1@RS485 | ZWave | ZigBee@deCONZ | SIGNALduino | MapleCUN | RHASSPY
svn: u.a MySensors, Weekday-&RandomTimer, Twilight,  div. attrTemplate-files