FHEM Forum

FHEM => Anfängerfragen => Thema gestartet von: blackbite am 10 Juli 2019, 13:33:46

Titel: HTTPUTILS Perl Warning nach jedem Start / Variable $ret uninitialized
Beitrag von: blackbite am 10 Juli 2019, 13:33:46
Hallo FHEM-Gemeinde,

ich denke, die PERL Warning ist unwichtig und eher von kosmetischer Natur, aber könnte man die bei Gelegenheit noch aus den Logs bekommen? Ich sehe, dass diese Warnung bei sehr vielen Leuten in den Logs steht.

PERL WARNING: Use of uninitialized value $ret in numeric le (<=) at FHEM/HttpUtils.pm line 621.

Beim Start wird wohl die Variable nicht definiert sein, deshalb kann der Vergleich <= 0 nicht klappen. Müsste diese Code-Section sein:

$data = $hdr.(defined($data) ? $data:"");
    $hash->{directWriteFn} = sub($) { # Nonblocking write
      my $ret = syswrite $hash->{conn}, $data;
      if($ret <= 0) {
        return if($! == EAGAIN);
        my $err = $!;
        RemoveInternalTimer(\%timerHash);
        HttpUtils_Close($hash);
        return $hash->{callback}($hash, "write error: $err", undef)
      }


Besten Dank
Blackbite