Umsetzen einer Menge Toggle-Schalter auf On-Off-Geräte

[BeetleX]

Hallo,
an folgenden Problem beiße ich mir nun schon tagelang die Zähne aus:

Viele FS20-Schalter sollen mit "toggle" viele Geräte=Lampen schalten.
Die Geräte sind vom Typ readingsProxy.

Die Schalter haben "_fs20" am Ende, z.B. "Lampe1_fs20" soll "Lampe1" schalten.

Habe nun zwei Wege versucht: über notify und DOIF.

Code Auswählen Erweitern

defmod n_fs20 notify .*_fs20  {my $n = $NAME;;;; $n =~ s/_fs20//;;;; CommandSet(undef, "$n $EVENT");;;; }\


Code Auswählen Erweitern

defmod di_fs20 DOIF (["_fs20$:toggle"]) ( {my $n = $DEVICE;;;; $n =~ s/_fs20//;;;; CommandSet(undef, "$DEVICE toggle");;;; } )
attr n.proxy_fs23 do always


#1 erzeugt ca. 10 Schaltspiele
#2 will kein device als bareword

Habt ihr einen Tipp?

VG Holger

[Damian]

Code Auswählen Erweitern

DOIF {["_fs20$:toggle"];$device =~ s/_fs20//;fhem_set("$device toggle")}

sollte funktionieren.

[BeetleX]

Super- funktioniert!
Danke!