From 8f7adb9ad9c702151d02f160e8cc4fe8be31425c Mon Sep 17 00:00:00 2001 From: tpoitzsch <> Date: Mon, 1 Dec 2014 20:31:49 +0000 Subject: [PATCH] statistics: 2nd try neg. val. git-svn-id: https://svn.fhem.de/fhem/trunk@7113 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- fhem/FHEM/98_statistics.pm | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/fhem/FHEM/98_statistics.pm b/fhem/FHEM/98_statistics.pm index 21a29cf5d..338e2ba73 100644 --- a/fhem/FHEM/98_statistics.pm +++ b/fhem/FHEM/98_statistics.pm @@ -505,7 +505,7 @@ statistics_doStatisticMinMax ($$$$$$) # Get reading, cut out first number without units my $value = $dev->{READINGS}{$readingName}{VAL}; - $value =~ s/^[\D]*(-?[\d.]*).*/$1/eg; + $value =~ s/(-?[\d.]*).*/$1/e; statistics_Log $hash, 4, "Calculating min/avg/max statistics for '".$dev->{NAME}.":$readingName = $value'"; # statistics_doStatisticMinMaxSingle: $hash, $readingName, $value, $saveLast, decPlaces @@ -606,7 +606,7 @@ statistics_doStatisticTendency ($$$$) # Get reading, cut out first number without units my $value = $dev->{READINGS}{$readingName}{VAL}; - $value =~ s/^[\D]*(-?[\d.]*).*/$1/eg; + $value =~ s/([-\d.]*).*/$1/e; statistics_Log $hash, 4, "Calculating hourly tendency statistics for '".$dev->{NAME}.":$readingName = $value'"; my $statReadingName = $hash->{PREFIX} . ucfirst($readingName) . "Tendency"; @@ -672,7 +672,7 @@ statistics_doStatisticDelta ($$$$) # Get reading, extract first number without units my $value = $dev->{READINGS}{$readingName}{VAL}; - $value =~ s/^[\D]*(-?[\d.]*).*/$1/eg; + $value =~ s/([-\d.]*).*/$1/e; statistics_Log $hash, 4, "Calculating delta statistics for '".$dev->{NAME}.":$readingName = $value'"; my $hiddenReadingName = ".".$dev->{NAME}.":".$readingName;