ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/JSON-XS/README
Revision: 1.11
Committed: Wed May 9 16:35:21 2007 UTC (17 years ago) by root
Branch: MAIN
CVS Tags: rel-1_2, rel-1_21, rel-1_22
Changes since 1.10: +49 -4 lines
Log Message:
*** empty log message ***

File Contents

# User Rev Content
1 root 1.1 NAME
2 root 1.2 JSON::XS - JSON serialising/deserialising, done correctly and fast
3 root 1.1
4     SYNOPSIS
5 root 1.2 use JSON::XS;
6 root 1.1
7 root 1.8 # exported functions, they croak on error
8     # and expect/generate UTF-8
9 root 1.4
10     $utf8_encoded_json_text = to_json $perl_hash_or_arrayref;
11     $perl_hash_or_arrayref = from_json $utf8_encoded_json_text;
12    
13 root 1.8 # objToJson and jsonToObj aliases to to_json and from_json
14     # are exported for compatibility to the JSON module,
15     # but should not be used in new code.
16    
17     # OO-interface
18 root 1.4
19     $coder = JSON::XS->new->ascii->pretty->allow_nonref;
20     $pretty_printed_unencoded = $coder->encode ($perl_scalar);
21     $perl_scalar = $coder->decode ($unicode_json_text);
22    
23 root 1.1 DESCRIPTION
24 root 1.2 This module converts Perl data structures to JSON and vice versa. Its
25     primary goal is to be *correct* and its secondary goal is to be *fast*.
26     To reach the latter goal it was written in C.
27    
28     As this is the n-th-something JSON module on CPAN, what was the reason
29     to write yet another JSON module? While it seems there are many JSON
30     modules, none of them correctly handle all corner cases, and in most
31     cases their maintainers are unresponsive, gone missing, or not listening
32     to bug reports for other reasons.
33    
34     See COMPARISON, below, for a comparison to some other JSON modules.
35    
36 root 1.4 See MAPPING, below, on how JSON::XS maps perl values to JSON values and
37     vice versa.
38    
39 root 1.2 FEATURES
40 root 1.8 * correct unicode handling
41 root 1.4 This module knows how to handle Unicode, and even documents how and
42     when it does so.
43 root 1.2
44     * round-trip integrity
45     When you serialise a perl data structure using only datatypes
46     supported by JSON, the deserialised data structure is identical on
47 root 1.8 the Perl level. (e.g. the string "2.0" doesn't suddenly become "2"
48     just because it looks like a number).
49 root 1.2
50     * strict checking of JSON correctness
51 root 1.6 There is no guessing, no generating of illegal JSON texts by
52 root 1.4 default, and only JSON is accepted as input by default (the latter
53     is a security feature).
54 root 1.2
55     * fast
56 root 1.4 Compared to other JSON modules, this module compares favourably in
57     terms of speed, too.
58 root 1.2
59     * simple to use
60     This module has both a simple functional interface as well as an OO
61     interface.
62    
63     * reasonably versatile output formats
64 root 1.4 You can choose between the most compact guarenteed single-line
65     format possible (nice for simple line-based protocols), a pure-ascii
66 root 1.8 format (for when your transport is not 8-bit clean, still supports
67     the whole unicode range), or a pretty-printed format (for when you
68     want to read that stuff). Or you can combine those features in
69     whatever way you like.
70 root 1.2
71     FUNCTIONAL INTERFACE
72     The following convinience methods are provided by this module. They are
73     exported by default:
74    
75 root 1.6 $json_text = to_json $perl_scalar
76 root 1.2 Converts the given Perl data structure (a simple scalar or a
77     reference to a hash or array) to a UTF-8 encoded, binary string
78     (that is, the string contains octets only). Croaks on error.
79    
80 root 1.6 This function call is functionally identical to:
81 root 1.2
82 root 1.6 $json_text = JSON::XS->new->utf8->encode ($perl_scalar)
83    
84     except being faster.
85    
86     $perl_scalar = from_json $json_text
87 root 1.2 The opposite of "to_json": expects an UTF-8 (binary) string and
88 root 1.6 tries to parse that as an UTF-8 encoded JSON text, returning the
89 root 1.2 resulting simple scalar or reference. Croaks on error.
90    
91 root 1.6 This function call is functionally identical to:
92    
93     $perl_scalar = JSON::XS->new->utf8->decode ($json_text)
94    
95     except being faster.
96 root 1.2
97     OBJECT-ORIENTED INTERFACE
98     The object oriented interface lets you configure your own encoding or
99     decoding style, within the limits of supported formats.
100    
101     $json = new JSON::XS
102     Creates a new JSON::XS object that can be used to de/encode JSON
103     strings. All boolean flags described below are by default
104     *disabled*.
105    
106     The mutators for flags all return the JSON object again and thus
107     calls can be chained:
108    
109 root 1.6 my $json = JSON::XS->new->utf8->space_after->encode ({a => [1,2]})
110 root 1.2 => {"a": [1, 2]}
111    
112 root 1.4 $json = $json->ascii ([$enable])
113     If $enable is true (or missing), then the "encode" method will not
114 root 1.6 generate characters outside the code range 0..127 (which is ASCII).
115     Any unicode characters outside that range will be escaped using
116     either a single \uXXXX (BMP characters) or a double \uHHHH\uLLLLL
117 root 1.11 escape sequence, as per RFC4627. The resulting encoded JSON text can
118     be treated as a native unicode string, an ascii-encoded,
119     latin1-encoded or UTF-8 encoded string, or any other superset of
120     ASCII.
121 root 1.2
122     If $enable is false, then the "encode" method will not escape
123 root 1.11 Unicode characters unless required by the JSON syntax or other
124     flags. This results in a faster and more compact format.
125    
126     The main use for this flag is to produce JSON texts that can be
127     transmitted over a 7-bit channel, as the encoded JSON texts will not
128     contain any 8 bit characters.
129 root 1.2
130 root 1.6 JSON::XS->new->ascii (1)->encode ([chr 0x10401])
131     => ["\ud801\udc01"]
132 root 1.2
133 root 1.11 $json = $json->latin1 ([$enable])
134     If $enable is true (or missing), then the "encode" method will
135     encode the resulting JSON text as latin1 (or iso-8859-1), escaping
136     any characters outside the code range 0..255. The resulting string
137     can be treated as a latin1-encoded JSON text or a native unicode
138     string. The "decode" method will not be affected in any way by this
139     flag, as "decode" by default expects unicode, which is a strict
140     superset of latin1.
141    
142     If $enable is false, then the "encode" method will not escape
143     Unicode characters unless required by the JSON syntax or other
144     flags.
145    
146     The main use for this flag is efficiently encoding binary data as
147     JSON text, as most octets will not be escaped, resulting in a
148     smaller encoded size. The disadvantage is that the resulting JSON
149     text is encoded in latin1 (and must correctly be treated as such
150     when storing and transfering), a rare encoding for JSON. It is
151     therefore most useful when you want to store data structures known
152     to contain binary data efficiently in files or databases, not when
153     talking to other JSON encoders/decoders.
154    
155     JSON::XS->new->latin1->encode (["\x{89}\x{abc}"]
156     => ["\x{89}\\u0abc"] # (perl syntax, U+abc escaped, U+89 not)
157    
158 root 1.4 $json = $json->utf8 ([$enable])
159     If $enable is true (or missing), then the "encode" method will
160 root 1.6 encode the JSON result into UTF-8, as required by many protocols,
161 root 1.4 while the "decode" method expects to be handled an UTF-8-encoded
162     string. Please note that UTF-8-encoded strings do not contain any
163     characters outside the range 0..255, they are thus useful for
164 root 1.6 bytewise/binary I/O. In future versions, enabling this option might
165     enable autodetection of the UTF-16 and UTF-32 encoding families, as
166     described in RFC4627.
167 root 1.2
168     If $enable is false, then the "encode" method will return the JSON
169     string as a (non-encoded) unicode string, while "decode" expects
170     thus a unicode string. Any decoding or encoding (e.g. to UTF-8 or
171     UTF-16) needs to be done yourself, e.g. using the Encode module.
172    
173 root 1.6 Example, output UTF-16BE-encoded JSON:
174    
175     use Encode;
176     $jsontext = encode "UTF-16BE", JSON::XS->new->encode ($object);
177    
178     Example, decode UTF-32LE-encoded JSON:
179    
180     use Encode;
181     $object = JSON::XS->new->decode (decode "UTF-32LE", $jsontext);
182 root 1.4
183     $json = $json->pretty ([$enable])
184 root 1.2 This enables (or disables) all of the "indent", "space_before" and
185     "space_after" (and in the future possibly more) flags in one call to
186     generate the most readable (or most compact) form possible.
187    
188 root 1.4 Example, pretty-print some simple structure:
189    
190 root 1.2 my $json = JSON::XS->new->pretty(1)->encode ({a => [1,2]})
191     =>
192     {
193     "a" : [
194     1,
195     2
196     ]
197     }
198    
199 root 1.4 $json = $json->indent ([$enable])
200     If $enable is true (or missing), then the "encode" method will use a
201     multiline format as output, putting every array member or
202     object/hash key-value pair into its own line, identing them
203     properly.
204 root 1.2
205     If $enable is false, no newlines or indenting will be produced, and
206 root 1.6 the resulting JSON text is guarenteed not to contain any "newlines".
207 root 1.2
208 root 1.6 This setting has no effect when decoding JSON texts.
209 root 1.2
210 root 1.4 $json = $json->space_before ([$enable])
211     If $enable is true (or missing), then the "encode" method will add
212     an extra optional space before the ":" separating keys from values
213     in JSON objects.
214 root 1.2
215     If $enable is false, then the "encode" method will not add any extra
216     space at those places.
217    
218 root 1.6 This setting has no effect when decoding JSON texts. You will also
219 root 1.2 most likely combine this setting with "space_after".
220    
221 root 1.4 Example, space_before enabled, space_after and indent disabled:
222    
223     {"key" :"value"}
224    
225     $json = $json->space_after ([$enable])
226     If $enable is true (or missing), then the "encode" method will add
227     an extra optional space after the ":" separating keys from values in
228     JSON objects and extra whitespace after the "," separating key-value
229 root 1.2 pairs and array members.
230    
231     If $enable is false, then the "encode" method will not add any extra
232     space at those places.
233    
234 root 1.6 This setting has no effect when decoding JSON texts.
235 root 1.2
236 root 1.4 Example, space_before and indent disabled, space_after enabled:
237    
238     {"key": "value"}
239    
240     $json = $json->canonical ([$enable])
241     If $enable is true (or missing), then the "encode" method will
242     output JSON objects by sorting their keys. This is adding a
243     comparatively high overhead.
244 root 1.2
245     If $enable is false, then the "encode" method will output key-value
246     pairs in the order Perl stores them (which will likely change
247     between runs of the same script).
248    
249     This option is useful if you want the same data structure to be
250 root 1.6 encoded as the same JSON text (given the same overall settings). If
251     it is disabled, the same hash migh be encoded differently even if
252 root 1.2 contains the same data, as key-value pairs have no inherent ordering
253     in Perl.
254    
255 root 1.6 This setting has no effect when decoding JSON texts.
256 root 1.2
257 root 1.4 $json = $json->allow_nonref ([$enable])
258     If $enable is true (or missing), then the "encode" method can
259     convert a non-reference into its corresponding string, number or
260     null JSON value, which is an extension to RFC4627. Likewise,
261     "decode" will accept those JSON values instead of croaking.
262 root 1.2
263     If $enable is false, then the "encode" method will croak if it isn't
264 root 1.6 passed an arrayref or hashref, as JSON texts must either be an
265 root 1.2 object or array. Likewise, "decode" will croak if given something
266     that is not a JSON object or array.
267    
268 root 1.4 Example, encode a Perl scalar as JSON value with enabled
269     "allow_nonref", resulting in an invalid JSON text:
270    
271     JSON::XS->new->allow_nonref->encode ("Hello, World!")
272     => "Hello, World!"
273    
274     $json = $json->shrink ([$enable])
275     Perl usually over-allocates memory a bit when allocating space for
276     strings. This flag optionally resizes strings generated by either
277     "encode" or "decode" to their minimum size possible. This can save
278 root 1.6 memory when your JSON texts are either very very long or you have
279 root 1.4 many short strings. It will also try to downgrade any strings to
280     octet-form if possible: perl stores strings internally either in an
281     encoding called UTF-X or in octet-form. The latter cannot store
282 root 1.9 everything but uses less space in general (and some buggy Perl or C
283     code might even rely on that internal representation being used).
284    
285     The actual definition of what shrink does might change in future
286     versions, but it will always try to save space at the expense of
287     time.
288 root 1.4
289     If $enable is true (or missing), the string returned by "encode"
290     will be shrunk-to-fit, while all strings generated by "decode" will
291     also be shrunk-to-fit.
292    
293     If $enable is false, then the normal perl allocation algorithms are
294     used. If you work with your data, then this is likely to be faster.
295    
296     In the future, this setting might control other things, such as
297     converting strings that look like integers or floats into integers
298     or floats internally (there is no difference on the Perl level),
299     saving space.
300    
301 root 1.8 $json = $json->max_depth ([$maximum_nesting_depth])
302 root 1.10 Sets the maximum nesting level (default 512) accepted while encoding
303     or decoding. If the JSON text or Perl data structure has an equal or
304     higher nesting level then this limit, then the encoder and decoder
305     will stop and croak at that point.
306 root 1.8
307     Nesting level is defined by number of hash- or arrayrefs that the
308     encoder needs to traverse to reach a given point or the number of
309     "{" or "[" characters without their matching closing parenthesis
310     crossed to reach a given character in a string.
311    
312     Setting the maximum depth to one disallows any nesting, so that
313     ensures that the object is only a single hash/object or array.
314    
315     The argument to "max_depth" will be rounded up to the next nearest
316     power of two.
317    
318     See SECURITY CONSIDERATIONS, below, for more info on why this is
319     useful.
320    
321 root 1.6 $json_text = $json->encode ($perl_scalar)
322 root 1.2 Converts the given Perl data structure (a simple scalar or a
323     reference to a hash or array) to its JSON representation. Simple
324     scalars will be converted into JSON string or number sequences,
325     while references to arrays become JSON arrays and references to
326     hashes become JSON objects. Undefined Perl values (e.g. "undef")
327     become JSON "null" values. Neither "true" nor "false" values will be
328     generated.
329    
330 root 1.6 $perl_scalar = $json->decode ($json_text)
331     The opposite of "encode": expects a JSON text and tries to parse it,
332     returning the resulting simple scalar or reference. Croaks on error.
333 root 1.2
334     JSON numbers and strings become simple Perl scalars. JSON arrays
335     become Perl arrayrefs and JSON objects become Perl hashrefs. "true"
336     becomes 1, "false" becomes 0 and "null" becomes "undef".
337    
338 root 1.11 ($perl_scalar, $characters) = $json->decode_prefix ($json_text)
339     This works like the "decode" method, but instead of raising an
340     exception when there is trailing garbage after the first JSON
341     object, it will silently stop parsing there and return the number of
342     characters consumed so far.
343    
344     This is useful if your JSON texts are not delimited by an outer
345     protocol (which is not the brightest thing to do in the first place)
346     and you need to know where the JSON text ends.
347    
348     JSON::XS->new->decode_prefix ("[1] the tail")
349     => ([], 3)
350    
351 root 1.4 MAPPING
352     This section describes how JSON::XS maps Perl values to JSON values and
353     vice versa. These mappings are designed to "do the right thing" in most
354     circumstances automatically, preserving round-tripping characteristics
355     (what you put in comes out as something equivalent).
356    
357     For the more enlightened: note that in the following descriptions,
358     lowercase *perl* refers to the Perl interpreter, while uppcercase *Perl*
359     refers to the abstract Perl language itself.
360    
361     JSON -> PERL
362     object
363     A JSON object becomes a reference to a hash in Perl. No ordering of
364 root 1.5 object keys is preserved (JSON does not preserver object key
365     ordering itself).
366 root 1.4
367     array
368     A JSON array becomes a reference to an array in Perl.
369    
370     string
371     A JSON string becomes a string scalar in Perl - Unicode codepoints
372     in JSON are represented by the same codepoints in the Perl string,
373     so no manual decoding is necessary.
374    
375     number
376     A JSON number becomes either an integer or numeric (floating point)
377     scalar in perl, depending on its range and any fractional parts. On
378     the Perl level, there is no difference between those as Perl handles
379     all the conversion details, but an integer may take slightly less
380     memory and might represent more values exactly than (floating point)
381     numbers.
382    
383     true, false
384     These JSON atoms become 0, 1, respectively. Information is lost in
385     this process. Future versions might represent those values
386     differently, but they will be guarenteed to act like these integers
387     would normally in Perl.
388    
389     null
390     A JSON null atom becomes "undef" in Perl.
391    
392     PERL -> JSON
393     The mapping from Perl to JSON is slightly more difficult, as Perl is a
394     truly typeless language, so we can only guess which JSON type is meant
395     by a Perl value.
396    
397     hash references
398     Perl hash references become JSON objects. As there is no inherent
399 root 1.9 ordering in hash keys (or JSON objects), they will usually be
400     encoded in a pseudo-random order that can change between runs of the
401     same program but stays generally the same within a single run of a
402     program. JSON::XS can optionally sort the hash keys (determined by
403     the *canonical* flag), so the same datastructure will serialise to
404     the same JSON text (given same settings and version of JSON::XS),
405     but this incurs a runtime overhead and is only rarely useful, e.g.
406     when you want to compare some JSON text against another for
407     equality.
408 root 1.4
409     array references
410     Perl array references become JSON arrays.
411    
412 root 1.9 other references
413     Other unblessed references are generally not allowed and will cause
414     an exception to be thrown, except for references to the integers 0
415     and 1, which get turned into "false" and "true" atoms in JSON. You
416     can also use "JSON::XS::false" and "JSON::XS::true" to improve
417     readability.
418    
419     to_json [\0,JSON::XS::true] # yields [false,true]
420    
421 root 1.4 blessed objects
422     Blessed objects are not allowed. JSON::XS currently tries to encode
423     their underlying representation (hash- or arrayref), but this
424     behaviour might change in future versions.
425    
426     simple scalars
427     Simple Perl scalars (any scalar that is not a reference) are the
428     most difficult objects to encode: JSON::XS will encode undefined
429     scalars as JSON null value, scalars that have last been used in a
430     string context before encoding as JSON strings and anything else as
431     number value:
432    
433     # dump as number
434     to_json [2] # yields [2]
435     to_json [-3.0e17] # yields [-3e+17]
436     my $value = 5; to_json [$value] # yields [5]
437    
438     # used as string, so dump as string
439     print $value;
440     to_json [$value] # yields ["5"]
441    
442     # undef becomes null
443     to_json [undef] # yields [null]
444    
445     You can force the type to be a string by stringifying it:
446    
447     my $x = 3.1; # some variable containing a number
448     "$x"; # stringified
449     $x .= ""; # another, more awkward way to stringify
450     print $x; # perl does it for you, too, quite often
451    
452     You can force the type to be a number by numifying it:
453    
454     my $x = "3"; # some variable containing a string
455     $x += 0; # numify it, ensuring it will be dumped as a number
456     $x *= 1; # same thing, the choise is yours.
457    
458     You can not currently output JSON booleans or force the type in
459     other, less obscure, ways. Tell me if you need this capability.
460    
461 root 1.2 COMPARISON
462     As already mentioned, this module was created because none of the
463     existing JSON modules could be made to work correctly. First I will
464     describe the problems (or pleasures) I encountered with various existing
465     JSON modules, followed by some benchmark values. JSON::XS was designed
466     not to suffer from any of these problems or limitations.
467    
468 root 1.3 JSON 1.07
469 root 1.2 Slow (but very portable, as it is written in pure Perl).
470    
471     Undocumented/buggy Unicode handling (how JSON handles unicode values
472     is undocumented. One can get far by feeding it unicode strings and
473     doing en-/decoding oneself, but unicode escapes are not working
474     properly).
475    
476     No roundtripping (strings get clobbered if they look like numbers,
477     e.g. the string 2.0 will encode to 2.0 instead of "2.0", and that
478     will decode into the number 2.
479    
480 root 1.3 JSON::PC 0.01
481 root 1.2 Very fast.
482    
483     Undocumented/buggy Unicode handling.
484    
485     No roundtripping.
486    
487     Has problems handling many Perl values (e.g. regex results and other
488     magic values will make it croak).
489    
490     Does not even generate valid JSON ("{1,2}" gets converted to "{1:2}"
491 root 1.6 which is not a valid JSON text.
492 root 1.2
493     Unmaintained (maintainer unresponsive for many months, bugs are not
494     getting fixed).
495    
496 root 1.3 JSON::Syck 0.21
497 root 1.2 Very buggy (often crashes).
498    
499     Very inflexible (no human-readable format supported, format pretty
500     much undocumented. I need at least a format for easy reading by
501     humans and a single-line compact format for use in a protocol, and
502 root 1.6 preferably a way to generate ASCII-only JSON texts).
503 root 1.2
504     Completely broken (and confusingly documented) Unicode handling
505     (unicode escapes are not working properly, you need to set
506     ImplicitUnicode to *different* values on en- and decoding to get
507     symmetric behaviour).
508    
509     No roundtripping (simple cases work, but this depends on wether the
510     scalar value was used in a numeric context or not).
511    
512     Dumping hashes may skip hash values depending on iterator state.
513    
514     Unmaintained (maintainer unresponsive for many months, bugs are not
515     getting fixed).
516    
517     Does not check input for validity (i.e. will accept non-JSON input
518     and return "something" instead of raising an exception. This is a
519     security issue: imagine two banks transfering money between each
520     other using JSON. One bank might parse a given non-JSON request and
521     deduct money, while the other might reject the transaction with a
522     syntax error. While a good protocol will at least recover, that is
523     extra unnecessary work and the transaction will still not succeed).
524    
525 root 1.3 JSON::DWIW 0.04
526 root 1.2 Very fast. Very natural. Very nice.
527    
528     Undocumented unicode handling (but the best of the pack. Unicode
529     escapes still don't get parsed properly).
530    
531     Very inflexible.
532    
533     No roundtripping.
534    
535 root 1.6 Does not generate valid JSON texts (key strings are often unquoted,
536     empty keys result in nothing being output)
537 root 1.2
538     Does not check input for validity.
539    
540     SPEED
541     It seems that JSON::XS is surprisingly fast, as shown in the following
542     tables. They have been generated with the help of the "eg/bench" program
543     in the JSON::XS distribution, to make it easy to compare on your own
544     system.
545    
546 root 1.5 First comes a comparison between various modules using a very short JSON
547 root 1.7 string:
548    
549     {"method": "handleMessage", "params": ["user1", "we were just talking"], "id": null}
550    
551     It shows the number of encodes/decodes per second (JSON::XS uses the
552     functional interface, while JSON::XS/2 uses the OO interface with
553     pretty-printing and hashkey sorting enabled). Higher is better:
554 root 1.2
555     module | encode | decode |
556     -----------|------------|------------|
557 root 1.7 JSON | 11488.516 | 7823.035 |
558     JSON::DWIW | 94708.054 | 129094.260 |
559     JSON::PC | 63884.157 | 128528.212 |
560     JSON::Syck | 34898.677 | 42096.911 |
561     JSON::XS | 654027.064 | 396423.669 |
562     JSON::XS/2 | 371564.190 | 371725.613 |
563 root 1.2 -----------+------------+------------+
564    
565 root 1.7 That is, JSON::XS is more than six times faster than JSON::DWIW on
566     encoding, more than three times faster on decoding, and about thirty
567 root 1.2 times faster than JSON, even with pretty-printing and key sorting.
568    
569 root 1.5 Using a longer test string (roughly 18KB, generated from Yahoo! Locals
570 root 1.2 search API (http://nanoref.com/yahooapis/mgPdGg):
571    
572     module | encode | decode |
573     -----------|------------|------------|
574 root 1.7 JSON | 273.023 | 44.674 |
575     JSON::DWIW | 1089.383 | 1145.704 |
576     JSON::PC | 3097.419 | 2393.921 |
577     JSON::Syck | 514.060 | 843.053 |
578     JSON::XS | 6479.668 | 3636.364 |
579     JSON::XS/2 | 3774.221 | 3599.124 |
580 root 1.2 -----------+------------+------------+
581    
582 root 1.7 Again, JSON::XS leads by far.
583 root 1.2
584 root 1.7 On large strings containing lots of high unicode characters, some
585     modules (such as JSON::PC) seem to decode faster than JSON::XS, but the
586     result will be broken due to missing (or wrong) unicode handling. Others
587     refuse to decode or encode properly, so it was impossible to prepare a
588     fair comparison table for that case.
589 root 1.5
590 root 1.8 SECURITY CONSIDERATIONS
591     When you are using JSON in a protocol, talking to untrusted potentially
592     hostile creatures requires relatively few measures.
593    
594     First of all, your JSON decoder should be secure, that is, should not
595     have any buffer overflows. Obviously, this module should ensure that and
596     I am trying hard on making that true, but you never know.
597    
598     Second, you need to avoid resource-starving attacks. That means you
599     should limit the size of JSON texts you accept, or make sure then when
600     your resources run out, thats just fine (e.g. by using a separate
601     process that can crash safely). The size of a JSON text in octets or
602     characters is usually a good indication of the size of the resources
603     required to decode it into a Perl structure.
604    
605     Third, JSON::XS recurses using the C stack when decoding objects and
606     arrays. The C stack is a limited resource: for instance, on my amd64
607     machine with 8MB of stack size I can decode around 180k nested arrays
608 root 1.10 but only 14k nested JSON objects (due to perl itself recursing deeply on
609     croak to free the temporary). If that is exceeded, the program crashes.
610     to be conservative, the default nesting limit is set to 512. If your
611 root 1.8 process has a smaller stack, you should adjust this setting accordingly
612     with the "max_depth" method.
613    
614     And last but least, something else could bomb you that I forgot to think
615 root 1.11 of. In that case, you get to keep the pieces. I am always open for
616 root 1.8 hints, though...
617 root 1.2
618     BUGS
619     While the goal of this module is to be correct, that unfortunately does
620     not mean its bug-free, only that I think its design is bug-free. It is
621 root 1.8 still relatively early in its development. If you keep reporting bugs
622     they will be fixed swiftly, though.
623 root 1.1
624     AUTHOR
625     Marc Lehmann <schmorp@schmorp.de>
626     http://home.schmorp.de/
627