Hilfe bei Perl-Code

[Arek]

Hallo zusammen,

kann mir jemand bitte den Fehler und am besten eine Lösung für den Code nennen?

Code Auswählen Erweitern

  fhem("define Alarmanlage_an at *".$sz." {if($year==".$sj." && $month==".$sm." && $mday==".$st.") {fhem "set Alarmanlage on";; fhem "delete Alarmanlage_an"} }");


Alle Variablen sind gesetzt.
Ich bin mit Perl noch nicht so vertraut und bekomme folgende Fehlermeldung:

Code Auswählen Erweitern

Bareword found where operator expected at ./FHEM/99_myUtilsThermostat.pm line 355, near "") {fhem "set"
        (Missing operator before set?)
String found where operator expected at ./FHEM/99_myUtilsThermostat.pm line 355, near "on";; fhem ""
String found where operator expected at ./FHEM/99_myUtilsThermostat.pm line 355, near "Alarmanlage_an"} }""


Danke euch im Voraus

[Spuckiii]

ich kann zwar auch kein perl. Aber es fehlt wohl was for set, - vlt die Klammern falsch gesetzt?

[Bennemannc]

Hallo,

gibst Du das in der Fhem.cfg ein ? Wenn nein - also WebIf - dann sind die doppelten ;; falsch. Zudem sagt die Fehlermeldung, das die " nicht in Ordnung währen.

Gruß Christoph