我无法将Perl对象存储到Memcached中。我尝试使用Cache::Memcached
将复杂的Perl对象存储到Memcached服务器中。 Memcached在默认情况下运行,因此我认为保留了64 MB。无论如何都不应该达到这个限制。
如何将复杂的Perl对象存储到Memcached中?
以下代码无法将对象存储在Memcached服务器中。如果您将迭代量从23_171
更改为例如4
,则没有问题。
#!/usr/bin/perl
############################################################################
# Script
use strict;
use warnings FATAL => 'all';
use Cache::Memcached;
my $memd = Cache::Memcached->new( servers => ['127.0.0.1:11211'] );
my $obj = MyModule->new;
$obj->add( MySubModule->new($_) ) for ( 1 .. 23_171 );
$memd->set( 'obj', $obj ) or die "failed";
$memd->disconnect_all;
############################################################################
# Collector-Module
package MyModule;
sub new { bless { jar => [] }, $_[0]; }
sub add { push @{ $_[0]->{jar} }, $_[1]; }
############################################################################
# Entry-Module
package MySubModule;
sub new { bless { id => $_[1], rnd => rand( $_[1] ) }, $_[0]; }
sub id { $_[0]->{id} = $_[0]->{id} // $_[1]; }
sub rnd { $_[0]->{rnd}; }
这个对象不应该使用10 MB而不管使用哪个序列化程序,对吧?
编辑:我刚刚发现20_000
次迭代会导致aprox。在Memcached中假设内存为15 MB。
答案 0 :(得分:3)
您可以在memcached中存储的值的最大大小通常为1兆字节。您的序列化对象是否超过该大小?
memcached的Version 1.4.2使这个可配置:
memcached -I 128k # Refuse items larger than 128k.
memcached -I 10m # Allow objects up to 10MB