diff --git a/fhem/FHEM/42_SYSMON.pm b/fhem/FHEM/42_SYSMON.pm
index d53560be4..95b96e6f7 100644
--- a/fhem/FHEM/42_SYSMON.pm
+++ b/fhem/FHEM/42_SYSMON.pm
@@ -38,7 +38,7 @@ use Data::Dumper;
 my $missingModulRemote;
 eval "use Net::Telnet;1" or $missingModulRemote .= "Net::Telnet ";
 
-my $VERSION = "2.2.4";
+my $VERSION = "2.2.5";
 
 use constant {
   PERL_VERSION    => "perl_version",
@@ -1163,7 +1163,7 @@ SYSMON_obtainParameters_intern($$)
     # nur lokal abfragen (macht remote keinen Sinn)
     if ($mode eq 'local') {
       # Perl version
-      $map->{+PERL_VERSION} = "$]";
+      $map->{+PERL_VERSION} = "$^V";
     }
     
     if(SYSMON_isProcFS($hash)) {
@@ -1488,8 +1488,10 @@ SYSMON_getUserDefined($$$$)
   
   my $out_str = "";
   foreach my $k (@out_arr) {
-    chomp($k);
-    $out_str.=$k." ";
+  	if(defined($k)) {
+      chomp($k);
+      $out_str.=$k." ";
+    }
   }
   #my $out_str = join(" ",@out_arr);
   ##my $out_str = SYSMON_execute($hash, $uCmd);