From bdbd8c367f37f8c5455b61d16668cd67aa7fcd1d Mon Sep 17 00:00:00 2001 From: nasseeder1 Date: Sat, 17 Mar 2018 21:11:29 +0000 Subject: [PATCH] 93_DbRep: some perl warnings fixed, commandref revised git-svn-id: https://svn.fhem.de/fhem/trunk@16431 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- fhem/FHEM/93_DbRep.pm | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/fhem/FHEM/93_DbRep.pm b/fhem/FHEM/93_DbRep.pm index 8d0dc6bae..b66ebb304 100644 --- a/fhem/FHEM/93_DbRep.pm +++ b/fhem/FHEM/93_DbRep.pm @@ -8880,7 +8880,7 @@ return; * a string with usage of SQL-wildcard, e.g. "%OL%" <new string> : * a simple string with/without spaces, e.g. "12 kWh" - * Perl code embedded in {}, e.g. {$VALUE = (split(",",$VALUE))[0]}. + * Perl code embedded in "{}" with quotes, e.g. "{($VALUE,$UNIT) = split(" ",$VALUE)}". The perl expression the variables $VALUE and $UNIT are committed to. The variables are changable within the perl code. The returned value of VALUE and UNIT are saved into the database field VALUE respectively UNIT of the dataset. @@ -8893,7 +8893,7 @@ return; set <name> changeValue "%OL%","12 OL"
# contains the field VALUE the substring "OL", it is changed to "12 OL".

- set <name> changeValue "12 kWh","{$VALUE,$UNIT = split(" ",$VALUE)}"
+ set <name> changeValue "12 kWh","{($VALUE,$UNIT) = split(" ",$VALUE)}"
# the old field value "12 kWh" is splitted to VALUE=12 and UNIT=kWh and saved into the database fields

set <name> changeValue "24%","{$VALUE = (split(" ",$VALUE))[0]}"
@@ -10481,7 +10481,7 @@ sub bdump { * ein String mit Verwendung von SQL-Wildcard, z.B. "%OL%" <neuer String> : * ein einfacher String mit/ohne Leerzeichen, z.B. "12 kWh" - * Perl Code eingeschlossen in {}, z.B. {$VALUE = (split(",",$VALUE))[0]}. + * Perl Code eingeschlossen in "{}" inkl. Quotes, z.B. "{($VALUE,$UNIT) = split(" ",$VALUE)}". Dem Perl-Ausdruck werden die Variablen $VALUE und $UNIT übergeben. Sie können innerhalb des Perl-Code geändert werden. Der zurückgebene Wert von $VALUE und $UNIT wird in dem Feld VALUE bzw. UNIT des Datensatzes gespeichert. @@ -10494,7 +10494,7 @@ sub bdump { set <name> changeValue "%OL%","12 OL"
# enthält das Feld VALUE den Teilstring "OL", wird es in "12 OL" geändert.

- set <name> changeValue "12 kWh","{$VALUE,$UNIT = split(" ",$VALUE)}"
+ set <name> changeValue "12 kWh","{($VALUE,$UNIT) = split(" ",$VALUE)}"
# der alte Feldwert "12 kWh" wird in VALUE=12 und UNIT=kWh gesplittet und in den Datenbankfeldern gespeichert

set <name> changeValue "24%","{$VALUE = (split(" ",$VALUE))[0]}"