(Perl) Load JSON Data at Path
Demonstrates how to load JSON data into a path within a JSON database. For example,
we begin with this JSON:
{
"a": 1,
"b": 2,
"c": {
"x": 1,
"y": 2
}
}
Then we load {"mm": 11, "nn": 22} to "c", and the result is this JSON:
{
"a": 1,
"b": 2,
"c": {
"mm": 11,
"nn": 22
}
}
Note: This example requires Chilkat v11.0.0 or greater.
use chilkat();
# Demonstrates how to load replace the data at a location within a JSON database.
$p = "{\"a\": 1, \"b\": 2, \"c\": { \"x\": 1, \"y\": 2 } }";
$json = chilkat::CkJsonObject->new();
$json->Load($p);
$json->put_EmitCompact(0);
print $json->emit() . "\r\n";
$q = "{\"mm\": 11, \"nn\": 22}";
$c = chilkat::CkJsonObject->new();
$json->ObjectOf2("c",$c);
$c->Load($q);
# See that x and y are replaced with mm and nn.
print $json->emit() . "\r\n";
|