From 7cc09cb76e00d643f159fa6f26c941d91f76fe40 Mon Sep 17 00:00:00 2001
From: hexenmeister <hexenmeister@users.noreply.github.com>
Date: Sun, 21 Sep 2014 18:26:33 +0000
Subject: [PATCH] added reading: perl_version

git-svn-id: https://svn.fhem.de/fhem/trunk/fhem@6590 2b470e98-0d58-463d-a4d8-8e2adae1ed80
---
 FHEM/42_SYSMON.pm | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/FHEM/42_SYSMON.pm b/FHEM/42_SYSMON.pm
index db0edbf20..ddaf79668 100644
--- a/FHEM/42_SYSMON.pm
+++ b/FHEM/42_SYSMON.pm
@@ -33,6 +33,7 @@ use warnings;
 my $VERSION = "1.7.1";
 
 use constant {
+	PERL_VERSION    => "perl_version",
   DATE            => "date",
   UPTIME          => "uptime",
   UPTIME_TEXT     => "uptime_text",
@@ -160,6 +161,7 @@ SYSMON_updateCurrentReadingsMap($) {
   # Map aktueller Namen erstellen
 	
 	# Feste Werte
+	$rMap->{+PERL_VERSION}       = "Perl Version";
 	$rMap->{+DATE}               = "Date";
 	$rMap->{+CPU_BOGOMIPS}       = "BogoMIPS";
 	if(SYSMON_isCPUFreqRPiBBB($hash)) {
@@ -709,6 +711,9 @@ SYSMON_obtainParameters($$)
 	 
 	# Einmaliges
 	if(!$u_first_mark) {
+	  # Perl version
+	  $map->{+PERL_VERSION} = "$]";
+	  
 		if(SYSMON_isProcFS($hash)) {
   	  $map = SYSMON_getCPUBogoMIPS($hash, $map);
 	  }