extract json data

[geek]

hi,
I need help to handle the result of a [::http::data $token]
I think the data is in json format
I get a "structure" like this:

Code: Select all

{"id":"cmpl-6oGBZmblablablablai9NTA","object":"text_completion","created":1677436637,"model":"text-davinci-003","choices":[{"text":"\n\nYes, today is Monday.","index":0,"logprobs":null,"finish_reason":null}],"usage":{"prompt_tokens":4,"completion_tokens":8,"total_tokens":12}}

and I want to extract the text field "\n\nYes, today is Monday."

how can I do?

[SpiKe^^]

That json data is somewhat odd, keeping the easiest plans from working:)

Let us assume you have that data you posted above saved in a variable named $jsondata

I might use something like this...

Code: Select all

package require json

set jdict [::json::json2dict $jsondata]

set todaytext [dict get [lindex [dict get $jdict choices] 0] text]

The value I think you seek should be saved in $todaytext

[caesar]

Add a string map like:

Code: Select all

set todaytext [string map {\n {}} [dict get [lindex [dict get $jdict choices] 0] text]]

to remove the new lines.

Edit: Typo, it's string not strong map.

[geek]

yes it works

thanks SpiKe^^ and caesar


I found a picture of how data is formatted:

[caesar]

You can use an online app like JSON Viewer as well.

[geek]

very useful

tnx