From 67b68a47f11a9047038f6bd2467e116a049936ab Mon Sep 17 00:00:00 2001
From: rudolfkoenig <rudolfkoenig@2b470e98-0d58-463d-a4d8-8e2adae1ed80>
Date: Mon, 20 Feb 2023 12:21:24 +0000
Subject: [PATCH] HttpUtils.pm: evaluate http header values if enclosed in {}
 (Forum 111959)

git-svn-id: https://svn.fhem.de/fhem/trunk@27255 2b470e98-0d58-463d-a4d8-8e2adae1ed80
---
 fhem/FHEM/HttpUtils.pm | 9 +++++++--
 1 file changed, 7 insertions(+), 2 deletions(-)

diff --git a/fhem/FHEM/HttpUtils.pm b/fhem/FHEM/HttpUtils.pm
index 27873ee26..54bf63cfa 100644
--- a/fhem/FHEM/HttpUtils.pm
+++ b/fhem/FHEM/HttpUtils.pm
@@ -659,7 +659,12 @@ HttpUtils_Connect2($)
   if(defined($hash->{header})) {
     if( ref($hash->{header}) eq 'HASH' ) {
       $hash->{header} = join("\r\n",
-        map(($_.': '.$hash->{header}{$_}), keys %{$hash->{header}}));
+        map { my $v = $hash->{header}{$_};
+              if($v =~ m/^{.+}$/){ #111959
+                $v = eval $v;
+                Log3 $hash, 1, "$hash->{NAME} httpHeader $v: $@" if($@);
+              }
+              "$_: $v" } keys %{$hash->{header}});
     }
   }
 
@@ -1052,7 +1057,7 @@ HttpUtils_ParseAnswer($)
 #    compress(1)
 #    data("")             # sending data via POST
 #    forceEncoding(undef) # Encode received data with this charset
-#    header("" or {})
+#    header("" or {})     # in the {} form value is evaluated if enclosed in {}
 #    hideurl(0)           # hide the url in the logs
 #    httpversion("1.0")
 #    ignoreredirects(0)