98_DOIF.pm: array bug fixed

git-svn-id: https://svn.fhem.de/fhem/trunk@20191 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
Damian
2019-09-18 19:19:29 +00:00
parent 1a5fc26184
commit 747282f585

View File

@@ -2208,18 +2208,18 @@ sub CheckRegexpDoIf
} }
return $i; return $i;
} }
my $events_temp; my @events_temp;
if (substr($i,0,1) eq '"') { if (substr($i,0,1) eq '"') {
$events_temp=$eventa; @events_temp=@{$eventa};
} }
else { else {
$events_temp=$eventas; @events_temp=@{$eventas};
} }
my $max=defined $events_temp ? int(@{$events_temp}):0; #my $max=defined @events_temp ? int(@events_temp):0;
my $s; my $s;
my $found; my $found;
for (my $j = 0; $j < $max; $j++) { for (my $j = 0; $j < @events_temp; $j++) {
$s = $events_temp->[$j]; $s = $events_temp[$j];
$s = "" if(!defined($s)); $s = "" if(!defined($s));
$found = ($s =~ m/$notifyExp/); $found = ($s =~ m/$notifyExp/);
if ($found) { if ($found) {