From 86839728ea6ecb7556f2f23dbd1e43e7276965df Mon Sep 17 00:00:00 2001 From: grompo <> Date: Sun, 17 Apr 2016 15:13:56 +0000 Subject: [PATCH] FRITZBOX: tr064Command with quoted strings git-svn-id: https://svn.fhem.de/fhem/trunk/fhem@11271 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- FHEM/72_FRITZBOX.pm | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/FHEM/72_FRITZBOX.pm b/FHEM/72_FRITZBOX.pm index 563c30880..8d76e4e04 100644 --- a/FHEM/72_FRITZBOX.pm +++ b/FHEM/72_FRITZBOX.pm @@ -584,7 +584,9 @@ sub FRITZBOX_Get($@) #get Fritzbox tr064command InternetGatewayDevice:1 deviceinfo GetInfo #get Fritzbox tr064command LANEthernetInterfaceConfig:1 lanethernetifcfg GetStatistics Log3 $name, 3, "FRITZBOX: get $name $cmd ".join(" ", @val); - + my ($a, $h) = parseParams( join (" ", @val) ); + @val = @$a; + #{ use Data::Dumper;; Dumper parseParams("{ a;;b };;c;;{ d;;e }", ';;') } return "Wrong number of arguments, usage: get $name tr064command service control action [argName1 argValue1] [argName2 argValue2] ..." if int @val <3 || int(@val) %2 !=1;