1# Default serializer class, so that we don't have to depend on Data::Serializer.
2# Recommend Data::Serializer for other serializers, rather than reinventing the wheel.
3#
4package CHI::Serializer::Storable;
5$CHI::Serializer::Storable::VERSION = '0.60';
6use Moo;
7use Storable;
8use strict;
9use warnings;
10
11sub serialize {
12    return Storable::nfreeze( $_[1] );
13}
14
15sub deserialize {
16    return Storable::thaw( $_[1] );
17}
18
19sub serializer {
20    return 'Storable';
21}
22
231;
24