diff -urN smeserver-learn-1.0.old/root/usr/bin/Learn.pl smeserver-learn-1.0/root/usr/bin/Learn.pl
--- smeserver-learn-1.0.old/root/usr/bin/Learn.pl	2020-12-24 07:29:04.051369987 +0000
+++ smeserver-learn-1.0/root/usr/bin/Learn.pl	2020-12-31 10:23:19.522872456 +0000
@@ -74,8 +74,8 @@
         # verification if user included or excluded
         my @include=  split(',',$sadb->get_prop("Learn", "Include")) if $sadb->get_prop("Learn", "Include");
         my @exclude=  split(',',$sadb->get_prop("Learn", "Exclude")) if $sadb->get_prop("Learn", "Exclude");
-        next if ( defined @exclude and  @found = grep { $_ eq $key } @exclude );
-        next unless ( ! defined @include or @found = grep { $_ eq $key } @include );
+        next if ( (@exclude) and  @found = grep { $_ eq $key } @exclude );
+        next unless ( ! (@include) or @found = grep { $_ eq $key } @include );
 
 	$currentuser = sprintf("Checking for user (%s): %s %s\n", $key,$firstname, $lastname);
 	print $currentuser unless ($verbose eq "active");