From 788b046006bc1b728ab8ce1f5b096c3771a9d891 Mon Sep 17 00:00:00 2001
From: borisneubert <>
Date: Sat, 29 Oct 2016 06:57:00 +0000
Subject: [PATCH] 10_OWServer: remove Perl  warning (forum 59466)

git-svn-id: https://svn.fhem.de/fhem/trunk@12462 2b470e98-0d58-463d-a4d8-8e2adae1ed80
---
 fhem/FHEM/10_OWServer.pm | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/fhem/FHEM/10_OWServer.pm b/fhem/FHEM/10_OWServer.pm
index ef65ca21e..48d128311 100644
--- a/fhem/FHEM/10_OWServer.pm
+++ b/fhem/FHEM/10_OWServer.pm
@@ -283,7 +283,11 @@ OWServer_Read($@)
     $ein = $rin;
     my $nfound = select($rout=$rin, undef, $eout=$ein, 4);
     if( $nfound ) {
-      chomp($ret= <READER>);
+      $ret= <READER>;
+      if(defined($ret)) {
+        chomp($ret) } else {
+        Log3 $hash, 5, "OWServer: undefined response from child $pid";
+      }
       RemoveInternalTimer($pid);
       OWServer_OpenDev($hash) if( $hash->{LAST_READ_FAILED} );
       $hash->{LAST_READ_FAILED} = 0;