Сбор данных из 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]=