NAME¶

JSON::Any - (DEPRECATED) Wrapper Class for the various JSON classes

VERSION¶

version 1.40

SYNOPSIS¶

    use JSON::Any;
    my $j = JSON::Any->new;
    my $json = $j->objToJson({foo=>'bar', baz=>'quux'});
    my $obj = $j->jsonToObj($json);

DESCRIPTION¶

This module tries to provide a coherent API to bring together the various JSON modules currently on CPAN. This module will allow you to code to any JSON API and have it work regardless of which JSON module is actually installed.

    use JSON::Any;
    my $j = JSON::Any->new;
    $json = $j->objToJson({foo=>'bar', baz=>'quux'});
    $obj = $j->jsonToObj($json);

or

    $json = $j->encode({foo=>'bar', baz=>'quux'});
    $obj = $j->decode($json);

or

    $json = $j->Dump({foo=>'bar', baz=>'quux'});
    $obj = $j->Load($json);

or

    $json = $j->to_json({foo=>'bar', baz=>'quux'});
    $obj = $j->from_json($json);

or without creating an object:

    $json = JSON::Any->objToJson({foo=>'bar', baz=>'quux'});
    $obj = JSON::Any->jsonToObj($json);

On load, JSON::Any will find a valid JSON module in your @INC by looking for them in this order:

    Cpanel::JSON::XS
    JSON::XS
    JSON::PP
    JSON
    JSON::DWIW

And loading the first one it finds.

You may change the order by specifying it on the "use JSON::Any" line:

    use JSON::Any qw(DWIW XS CPANEL JSON PP);

Specifying an order that is missing modules will prevent those module from being used:

    use JSON::Any qw(CPANEL PP); # same as JSON::MaybeXS

This will check in that order, and will never attempt to load JSON::XS, "JSON" in JSON.pm, or JSON::DWIW. This can also be set via the $ENV{JSON_ANY_ORDER} environment variable.

JSON::Syck has been deprecated by its author, but in the attempt to still stay relevant as a "Compatibility Layer" JSON::Any still supports it. This support however has been made optional starting with JSON::Any 1.19. In deference to a bug request starting with JSON.pm 1.20, JSON::Syck and other deprecated modules will still be installed, but only as a last resort and will now include a warning.

    use JSON::Any qw(Syck XS JSON);

or

    $ENV{JSON_ANY_ORDER} = 'Syck XS JSON';

At install time, JSON::Any will attempt to install JSON::PP as a reasonable fallback if you do not appear have any backends installed on your system.

WARNING: If you call JSON::Any with an empty list

    use JSON::Any ();

It will skip the JSON package detection routines and will die loudly that it couldn't find a package.

DEPRECATION NOTICE¶

The original need for JSON::Any has been solved (quite some time ago actually). If you're producing new code it is recommended to use JSON::MaybeXS which will optionally use Cpanel::JSON::XS for speed purposes.

JSON::Any will continue to be maintained for compatibility with existing code (as well as for rare cases where you want JSON::DWIW as a backend), but for new code you should strongly consider using JSON::MaybeXS instead.

For more information about the various options and which are preferred, see Matt Trout's analysis <http://shadow.cat/blog/matt-s-trout/mstpan-7>.

WARNING¶

JSON::XS 3.0 or higher has a conflict with any version of JSON.pm less than 2.90 when you use JSON.pm's "-support_by_pp" option, which JSON::Any enables by default.

This situation should only come up with JSON::Any if you have JSON.pm 2.61 or lower and JSON::XS 3.0 or higher installed, and you use JSON.pm via "use JSON::Any qw(JSON);" or the "JSON_ANY_ORDER" environment variable.

If you run into an issue where you're getting recursive inheritance errors in a Types::Serialiser package, please try upgrading JSON.pm to 2.90 or higher.

METHODS¶

ACKNOWLEDGEMENTS¶

This module came about after discussions on irc.perl.org about the fact that there were now six separate JSON perl modules with different interfaces.

In the spirit of Class::Any, JSON::Any was created with the considerable help of Matt 'mst' Trout.

Simon Wistow graciously supplied a patch for backwards compatibility with JSON::XS versions previous to 2.01.

San Dimas High School Football Rules!

SUPPORT¶

Bugs may be submitted through the RT bug tracker <https://rt.cpan.org/Public/Dist/Display.html?Name=JSON-Any> (or bug-JSON-Any@rt.cpan.org <mailto:bug-JSON-Any@rt.cpan.org>).

I am also usually active on irc, as 'ether' at "irc.perl.org" and "irc.libera.chat".

AUTHORS¶

• Chris Thompson <cthom@cpan.org>
• Chris Prather <chris@prather.org>
• Robin Berjon <robin@berjon.com>
• Marc Mims <marc@questright.com>
• Tomas Doran <bobtfish@bobtfish.net>

CONTRIBUTORS¶

• Karen Etheridge <ether@cpan.org>
• יובל קוג'מן (Yuval Kogman) <nothingmuch@woobling.org>
• Dagfinn Ilmari Mannsåker <ilmari@ilmari.org>
• Graham Knop <haarg@haarg.org>
• Justin Hunter <justin.d.hunter@gmail.com>
• Matthew Horsfall <wolfsage@gmail.com>
• Todd Rinaldo <toddr@cpan.org>

COPYRIGHT AND LICENCE¶

This software is copyright (c) 2007 by Chris Thompson.

This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.