From c4c75bf38c14effccb8b178636c4e3316b1dc69f Mon Sep 17 00:00:00 2001
From: nasseeder1 <nasseeder1@users.noreply.github.com>
Date: Sat, 4 Apr 2020 20:44:56 +0000
Subject: [PATCH] 93_Log2Syslog: contrib 5.10.0

git-svn-id: https://svn.fhem.de/fhem/trunk/fhem@21597 2b470e98-0d58-463d-a4d8-8e2adae1ed80
---
 contrib/DS_Starter/93_Log2Syslog.pm | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/contrib/DS_Starter/93_Log2Syslog.pm b/contrib/DS_Starter/93_Log2Syslog.pm
index 827099e43..8b41efb89 100644
--- a/contrib/DS_Starter/93_Log2Syslog.pm
+++ b/contrib/DS_Starter/93_Log2Syslog.pm
@@ -499,12 +499,12 @@ sub Log2Syslog_Read {
           my $i = 0;
           $mlen = $+{mlen};
           $tail = $+{tail}; 
-          $msg  = substr($tail,0,$mlen);
+          $msg  = substr($tail,0,$mlen-(length($mlen)+1));
           chomp $msg;
           push @load, $msg;
           
           if(length($tail) >= $mlen) {
-              $tail = substr($tail,$mlen); 
+              $tail = substr($tail,$mlen-(length($mlen)+1)); 
           } else {
               $tail = "";
           }  
@@ -515,11 +515,11 @@ sub Log2Syslog_Read {
               $i++;
               $mlen = $+{mlen};
               $tail = $+{tail};
-              $msg  = substr($tail,0,$mlen);
+              $msg  = substr($tail,0,$mlen-(length($mlen)+1));
               chomp $msg;
               push @load, $msg;
               next if(!$tail);
-              $tail = substr($tail,$mlen);           
+              $tail = substr($tail,$mlen-(length($mlen)+1));           
               Log2Syslog_Log3slog ($hash, 5, "Log2Syslog $name -> LEN$i: $mlen, MSG$i: $msg, TAIL$i: $tail");             
           }   
       } else {