/usr/share/perl5/CHI/Serializer/JSON.pm is in libchi-perl 0.60-3.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 | # Default key serializer class, so that we don't have to depend on Data::Serializer.
# Recommend Data::Serializer for other serializers, rather than reinventing the wheel.
#
package CHI::Serializer::JSON;
$CHI::Serializer::JSON::VERSION = '0.60';
use CHI::Util qw(json_encode json_decode);
use Moo;
use strict;
use warnings;
sub serialize {
return json_encode( $_[1] );
}
sub deserialize {
return json_decode( $_[1] );
}
1;
|