How can I format the following list to json2 subprotocol format?
header_entry_new = list(Domain="Login",ID=1, Key=list(Elements=list(ApplicationId=2