• MemcachedBackend.pm

    458 459  
    3 3 use strict;
    4 4 use warnings 'all';
    5 5
    6 use Cache::Memcached;
    6 use Cache::Memcached::Fast;
    7 7
    8 8
    9 9 #########################################
    … …  
    17 17 my $implementation = $opts->{mc_backend};
    18 18 $memd ||= $implementation->new({
    19 19 servers => $$opts{mc_servers},
    20 debug => $$opts{mc_debug},
    21 20 namespace => $$opts{mc_namespace},
    22 21 });
    23 22 bless {memd=>$memd}, $class;