File Coverage

blib/lib/MojoX/Plugin/AnyCache/Backend.pm

Criterion	Covered	Total	%
statement	19	24	79.1
branch	3	6	50.0
condition	4	6	66.6
subroutine	4	9	44.4
pod	0	6	0.0
total	30	51	58.8

package MojoX::Plugin::AnyCache::Backend;

use strict;
use warnings;
use Mojo::Base '-base';

has 'config';
has 'support_sync' => sub { 0 };
has 'support_async' => sub { 0 };
has 'serialiser';

sub get_serialiser {
    my ($self) = @_;
    if(!$self->serialiser && (my $s = $self->config->{serialiser})) {
        eval {
            eval "require $s;";
            warn("Require failed: $@") if $self->config->{debug} && $@;
            my $serialiser = $self->config->{serialiser}->new;
            $serialiser->config($self->config);
            $self->serialiser($serialiser);
        };
        die("Failed to load serialiser $s: $@") if $@;
    }
    return $self->serialiser;
}

sub get { die("Must be overridden in backend module") };
sub set { die("Must be overridden in backend module") };
sub incr { die("Must be overridden in backend module") };
sub decr { die("Must be overridden in backend module") };
sub del { die("Must be overridden in backend module") };

1;