PERL WARNING: Argument "er" isn't numeric in array element at ./FHEM/72_FRITZBOX

[marc2]

Moin !

Das passiert bei mir bei jedem readout, weil $readout an dieser Stelle nicht numerisch ist. Die Prüfung
auf einen zulässigen numerischen Wert beseitigt das Problem:

Code Auswählen Erweitern

   elsif ($format eq "mohtype") {
      if ($readout =~ /^[012]$/) {
        $readout = $mohtype[$readout] if defined $mohtype[$readout];
      }
      $readout = "" if $readout eq "er";
   }

Gruß, Marc

[AET_FHEM]

DANKE !!!