list in userReading

[TWART016]

Hi,

ich benötige die Namen der Geräte in einem Userreading. Dabei sollen die Namen kommagetrennt werden, um diese in Tablet UI anzuzeigen.
So sieht das devspec aus:

Code Auswählen Erweitern

list a:FTUI_at=1

Wie bekomme ich die Devicenamen in das userReading device_list?


Gruß
TWART016

[TWART016]

Über dieses userReading bekomme ich jetzt die Werte mit Zeilenumbruch

Code Auswählen Erweitern

device_list {fhem ("list a:FTUI_at=1");}

So sieht dann das Device aus:

Code Auswählen Erweitern

  2018-08-07 14:16:39   device_list     LED_Schlafzimmer
LED_Wohnzimmer

Wie kann ich nun den Zeilenumbruch (Leerzeichen??) durch ein Komma ersetzen?

[Otto123]

Hi,

mit sowas in der Art:

Code Auswählen Erweitern

device_list {my $val=fhem ("list a:FTUI_at=1");$val =~ s/ /,/; $val;}

Aber es wird wohl kein Leerzeichen sein. \n vielleicht?

Gruß Otto

[TWART016]

Zwischen den ersten beiden Geräten, wird das Komma mit \n gesetzt.

Code Auswählen Erweitern

device_list {my $val=fhem ("list a:FTUI_at=1");$val =~ s/\n/,/; $val;},

Bei den weiteren wohl wieder ein Zeilenumbruch dargestellt
     2018-08-07 15:54:30   device_list     LED_Schlafzimmer,LED_Wohnzimmer
SB_Player_Bad
SB_Player_Kueche

[Otto123]

g
Apply the replacement to all matches to the regexp, not just the first.

Also s/\n/,/g

Findet Google

Gruß Otto

[TWART016]

Jetzt wird nur noch am Ende der Zeile ein Komma angezeigt.
Damit wollte ich es entfernen.

Code Auswählen Erweitern

;$val =~ s/,$//;

In einem anderen Code geht das auch, hier aber nicht.

Code Auswählen Erweitern

device_list {my $val=fhem ("list a:FTUI_at=1");$val =~ s/,$//;$val =~ s/\n/,/g; $val;},

[Otto123]

falsche Reihenfolge?