nsored by socialflow.com
package JSON::Diffable;
use JSON ();
use Exporter 'import';
our $VERSION = '0.000001'; # 0.0.1
$VERSION = eval $VERSION;
my $real = JSON->new->relaxed->allow_nonref->utf8
;
our @EXPORT_OK = qw( encode_json decode_json );
sub encode_json {
my $data = shift;
return _encode($data, 0);
}
sub decode_json {
my $str = shift;
return $real->decode($str);
}
s
AME
JSON::Diffable - A relaxed and easy diffable JSON variant
=head1 SYNOPSIS
use JSON::Diffable qw( encode_json decode_json );
$json = encode_json $data;
$data = decode_json $json;
=