From 176fa98ac7b34b4e73f21a5dc8508e164ecebbf1 Mon Sep 17 00:00:00 2001
From: betateilchen <>
Date: Sun, 23 Jul 2017 09:25:07 +0000
Subject: [PATCH] statistics2.cgi: ignore invalid/missing perl versions

git-svn-id: https://svn.fhem.de/fhem/trunk/fhem@14769 2b470e98-0d58-463d-a4d8-8e2adae1ed80
---
 contrib/statistics/2017/statistics2.cgi | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/contrib/statistics/2017/statistics2.cgi b/contrib/statistics/2017/statistics2.cgi
index 775c2e7fc..14abac75a 100755
--- a/contrib/statistics/2017/statistics2.cgi
+++ b/contrib/statistics/2017/statistics2.cgi
@@ -202,7 +202,7 @@ sub doAggregate() {
       $res     =~ s/^v//;
       $res     =~ /(^\d*\.\d*)/;
       $res      = $1;
-      $countAll{'system'}{'perl'}{$res}++;
+      $countAll{'system'}{'perl'}{$res}++ if($res);
 
       if (defined($decoded->{'system'}{'revdate'})){
          $res = $decoded->{'system'}{'revdate'};