(Perl) JSON Insert Empty Array or Object

Demonstrates how to use the UpdateNewArray and UpdateNewObject methods to insert an empty array or object.

Note: The UpdateNewArray an UpdateNewObject methods were introduced in Chilkat v9.5.0.75.

Chilkat Perl Downloads Perl Module for Windows, MacOS, Linux, Alpine Linux

use chilkat();

$json = chilkat::CkJsonObject->new();

# The following code builds the following JSON, which contains both an empty array and empty object:

# 	{
# 	  "abc": {
# 	    "xyz": [
# 	      {
# 	        "Name": "myName",
# 	        "Description": "description",
# 	        "ScheduleDefinition": "schedule definition",
# 	        "ExceptionScheduleDefinition": "",
# 	        "Attribute": [
# 	        ],
# 	        "SomeEmptyObject": {},
# 	        "token": "token"
# 	      }
# 	    ]
# 	  }
# 	}

$json->UpdateString("abc.xyz[0].Name","myName");
$json->UpdateString("abc.xyz[0].Description","description");
$json->UpdateString("abc.xyz[0].ScheduleDefinition","schedule definition");
$json->UpdateString("abc.xyz[0].ExceptionScheduleDefinition","");
$json->UpdateNewArray("abc.xyz[0].Attribute");
$json->UpdateNewObject("abc.xyz[0].SomeEmptyObject");
$json->UpdateString("abc.xyz[0].token","token");

$json->put_EmitCompact(0);
print $json->emit() . "\r\n";