Сбор данных из HTTP-запросов
Зададим функцию, которая озвучивает значение параметра param при поступлении сообщения, содержащего param.
In[1]:=
listener =
ChannelListen["speak",
Speak["Arrived " <> ToString[Lookup[#Message, "param"]]] &,
Permissions -> "Public"]
Out[1]=
Отправим сообщение для функции-слушателя с терминала на том же или любом другом компьютере с помощью cURL и прослушаем сообщение от слушателя.
In[2]:=
"curl \"" <>
URLBuild[listener["URL"], {"operation" -> "send",
"param" -> 123}] <> "\""
Out[2]=
Out[3]=
Отправим сообщение из веб-браузера.
In[4]:=
URLBuild[listener["URL"], {"operation" -> "send", "param" -> 456}]
Out[4]=
Out[5]=
Отправим сообщение из системы Wolfram.
In[6]:=
ChannelSend[$WolframID <> ":speak", <|"param" -> 789|>]
Out[6]=
Данные, полученные слушателем.
In[7]:=
listener["Dataset"]
Out[7]=