(Perl) Load a JsonArray

Demonstrates how to load a JsonArray.

Note: This example requires Chilkat v9.5.0.64 or greater.

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

use chilkat();

# This example requires Chilkat v9.5.0.64 or greater.

# Loading into a new JSON array is simple and straightforward.
$a = chilkat::CkJsonArray->new();
$a->Load("[ 1,2,3,4 ]");

# Output:  [1,2,3,4]
print $a->emit() . "\r\n";
print "--------" . "\r\n";

# The JsonArray's Load and LoadSb methods have a peculiar behavior when
# it is already part of a JSON document.  In this case, the JsonArray
# becomes detached, and the original document remains unchanged.
# This is intentional due to the nature of the internal implementation.
# For example:

$json = chilkat::CkJsonObject->new();
$json->Load("{ \"abc\": [ 1,2,3,4 ] }");

# Output:  (json) {"abc":[1,2,3,4]}
print "(json) " . $json->emit() . "\r\n";
print "--------" . "\r\n";

# abc is a JsonArray
$abc = $json->ArrayOf("abc");
# When Load is called, abc becomes it's own document, and the original is not modified.
$abc->Load("[ 5,6,7,8 ]");

# Output: (abc) [5,6,7,8]
print "(abc) " . $abc->emit() . "\r\n";
print "--------" . "\r\n";

# Output: (json) {"abc":[1,2,3,4]}
print "(json) " . $json->emit() . "\r\n";
print "--------" . "\r\n";