disabledForIntervals mit Perl-Code

[nesges]

Ich möchte manche Devices über Nacht abstellen. disabledForIntervals macht das sehr elegant, versteht aber aktuell kein Perl. Ich schlage folgende Ergänzung in fhem.pl 786 ff vor:

Code Auswählen Erweitern

  my $dfi = $attr{$devname}{disabledForIntervals};
  if(defined($dfi)) {
    if($dfi =~ m/^\s*{.*}\s*$/) {
        $dfi = eval $dfi;
    }


Damit wäre zB disabledForIntervals { sunset_abs()."-24:00 00:00-".sunrise_abs() } möglich

[rudolfkoenig]

Habs mit leichten Aenderungen eingebaut, damit sowas moeglich ist:

attr d disabledForIntervals 23-24 {sunset_abs()}-24 {sunrise_abs()}-08

Bitte fertige Patches im passenden Subforum (hier Sonstiges) posten, diesen Subforum lese ich normalerweise nicht.

[nesges]

Vielen Dank!