diff --git a/fhem/FHEM/98_JsonMod.pm b/fhem/FHEM/98_JsonMod.pm index f4cf2a662..10c79e496 100644 --- a/fhem/FHEM/98_JsonMod.pm +++ b/fhem/FHEM/98_JsonMod.pm @@ -1365,7 +1365,7 @@ sub get { my $rex = join('|', @operators); $rex = qr/^($rex)/; - while (my $c = substr($filter, 0, 1)) { + while (defined(my $c = substr($filter, 0, 1))) { if ($c eq q{'}) { $delim ^= 1; #substr($filter, 0, 1, '');