Perl

JSON UpdateNumber vs UpdateInt

Demonstrates UpdateNumber vs UpdateString. Perl

use chilkat();

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

# If a number is too large for a 32-bit signed integer, then call UpdateNumber instead of UpdateInt.
# The large integer is passed to UpdateNumber as a string, but in the JSON it will be an integer.

# For example:
$json->UpdateNumber("largeNumber","6884556842");

# If the integer is small enough for a 32-bit signed integer, then use UpdateInt:
$json->UpdateInt("reasonableInt",123456);

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

# The output:
# Notice the large number passed as a string does not have quotes in the JSON

# {
#   "largeNumber": 6884556842,
#   "reasonableInt": 123456
# }