使用 httr 将 curl 命令转换为 R（特别是 '--data-binary @'）
Posted
技术标签:
【中文标题】使用 httr 将 curl 命令转换为 R（特别是 \'--data-binary @\'）【英文标题】：Translating a curl command to R using httr (specifically '--data-binary @')使用 httr 将 curl 命令转换为 R（特别是 '--data-binary @'） 【发布时间】：2017-11-29 13:34:36 【问题描述】：我正在尝试使用 bing Speech-to-text 将一些声音文件转录为文本。
以下命令在命令行中运行（在 Windows 10 上使用 git bash）：
curl -v -X POST "https://speech.platform.bing.com/speech/recognition/interactive/
cognitiveservices/v1?language=<LANG>&format=detailed" -H "Transfer-Encoding:
chunked" -H "Ocp-Apim-Subscription-Key: <MY KEY>" -H "Content-type:
audio/wav; codec=audio/pcm; samplerate=16000" --data-binary @<MY .WAV-FILE>
这个我试过了，还是不行：
httr::POST(url = myURL,
add_headers("Ocp-Apim-Subscription-Key" = key,
"Content-type" = "audio/wav; codec=audio/pcm; samplerate=16000",
"Transfer-Encoding" = "chunked"),
body = (list("file" = upload_file("PATH_TO_FILE.wav"))),
verbose())
它返回这个输出： 回应
[https://speech.platform.bing.com/speech/recognition/dictation/
cognitiveservices/v1?language=<LANG>&format=detailed]
Date: 2017-11-29 13:29
Status: 200
Content-Type: text/plain
Size: 75 B
我认为该请求与 .wav 文件的解释有关，并且我需要以某种方式将“--data-binary”标签添加到 httr-request。我可以看到我的“内容类型”是纯文本，尽管我已经指定了。此外：API 文档指定我需要在我的 wav 文件前面加上一个 at 符号。
任何帮助将不胜感激。
干杯。
编辑：链接到 API 文档 https://docs.microsoft.com/da-dk/azure/cognitive-services/speech/getstarted/getstartedrest?tabs=curl#tabpanel_AFC9x30-dR_curl
【问题讨论】：
【参考方案1】：我想通了。
关键是在正文中设置正确的 MIME 类型。不设置此 MIME 类型可能会导致接收端的错误解释，即使我们得到响应 200。
body <- list(file = httr::upload_file(
paste0(path, "/", f),
type = "audio/wav; codec=audio/pcm; samplerate=16000"))
其中paste0(path, "/", f) 是音频文件的路径。
myURL <- sprintf('https://speech.platform.bing.com/speech/recognition/%s/cognitiveservices/v1?language=%s&format=%s',
"dictation",
"da-DK",
"detailed")
rs <- httr::POST(
url = myURL,
httr::add_headers(.headers = c("Ocp-Apim-Subscription-Key" = key)),
httr::add_headers(.headers = c("Transfer-Encoding" = "chunked")),
body = body)
【讨论】：
以上是关于使用 httr 将 curl 命令转换为 R（特别是 '--data-binary @'）的主要内容，如果未能解决你的问题，请参考以下文章