memcached使用笔记

最新推荐文章于 2025-12-31 22:03:23 发布

原创最新推荐文章于 2025-12-31 22:03:23 发布 · 519 阅读

0 ·

CC 4.0 BY-SA版权

文章标签：

#memcached #character #delete #perl #cmd #360

50.其它数据库及NoSQL 专栏收录该内容

1 篇文章

订阅专栏

本文介绍如何使用Perl安装和操作Memcached缓存系统。通过示例代码演示了如何设置及增减缓存中的数据，并利用telnet命令进行验证。

安装perl下访问memcached的模块Cached:Memcached，方法如下：

perl -MCPAN -e shell

cpan>install Cached:Memcached

启动memcached:

osdba@osdba-laptop:~$ memcached -d -m 64M

使用telnet访问memcached，查看内容：

osdba@osdba-laptop:~/tmp$ telnet 127.0.0.1 11211

Trying 127.0.0.1...

Connected to 127.0.0.1.

Escape character is '^]'.

set key1 0 60 9

tangcheng

STORED

get key1

VALUE key1 0 9

tangcheng

END

stats

STAT pid 4384

STAT uptime 693

STAT time 1286120867

STAT version 1.4.5

STAT pointer_size 64

STAT rusage_user 0.420000

STAT rusage_system 0.830000

STAT curr_connections 10

STAT total_connections 12

STAT connection_structures 11

STAT cmd_get 35511

STAT cmd_set 2

STAT cmd_flush 0

STAT get_hits 35511

STAT get_misses 0

STAT delete_misses 0

STAT delete_hits 0

STAT incr_misses 0

STAT incr_hits 35508

STAT decr_misses 0

STAT decr_hits 0

STAT cas_misses 0

STAT cas_hits 0

STAT cas_badval 0

STAT auth_cmds 0

STAT auth_errors 0

STAT bytes_read 852288

STAT bytes_written 1221492

STAT limit_maxbytes 67108864

STAT accepting_conns 1

STAT listen_disabled_num 0

STAT threads 4

STAT conn_yields 0

STAT bytes 152

STAT curr_items 2

STAT total_items 6

STAT evictions 0

STAT reclaimed 0

END

quit

Connection closed by foreign host.

整数操作：

osdba@osdba-laptop:~/tmp$ telnet 127.0.0.1 11211

Trying 127.0.0.1...

Connected to 127.0.0.1.

Escape character is '^]'.

get key1

END

set key1 0 3600 3 123

123

STORED

incr key1 3

126

decr key1 5

121

delete key1

DELETED

get key1

END

quit

Connection closed by foreign host.

osdba@osdba-laptop:~/tmp$

osdba@osdba-laptop:~/tmp$ telnet 127.0.0.1 11211

Trying 127.0.0.1...

Connected to 127.0.0.1.

Escape character is '^]'.

stats items

STAT items:1:number 1

STAT items:1:age 478

STAT items:1:evicted 0

STAT items:1:evicted_nonzero 0

STAT items:1:evicted_time 0

STAT items:1:outofmemory 0

STAT items:1:tailrepairs 0

STAT items:1:reclaimed 0

END

set key2 0 3600 9 1234

tangcheng

STORED

stats itmes

ERROR

stats items

STAT items:1:number 2

STAT items:1:age 478

STAT items:1:evicted 0

STAT items:1:evicted_nonzero 0

STAT items:1:evicted_time 0

STAT items:1:outofmemory 0

STAT items:1:tailrepairs 0

STAT items:1:reclaimed 0

END

quit

Connection closed by foreign host.

osdba@osdba-laptop:~/tmp$ telnet 127.0.0.1 11211

Trying 127.0.0.1...

Connected to 127.0.0.1.

Escape character is '^]'.

stats sizes

STAT 96 2

END

stats slabs

STAT 1:chunk_size 96

STAT 1:chunks_per_page 10922

STAT 1:total_pages 1

STAT 1:total_chunks 10922

STAT 1:used_chunks 2

STAT 1:free_chunks 0

STAT 1:free_chunks_end 10920

STAT 1:mem_requested 152

STAT 1:get_hits 35511

STAT 1:cmd_set 4

STAT 1:delete_hits 1

STAT 1:incr_hits 35509

STAT 1:decr_hits 1

STAT 1:cas_hits 0

STAT 1:cas_badval 0

STAT active_slabs 1

STAT total_malloced 1048512

END

红色的是需要输入的命令。跟随的是返回的结果。

写一段小的perl代码：

#!/usr/bin/perl -w use Cache::Memcached; my $memd = new Cache::Memcached{servers => ['127.0.0.1:11211'] }; my $key = 'test'; $memd->add($key => 1,3600) or warn 'Alread added'; while(1) { print $memd->get($key),"/n"; $memd->incr($key) or warn 'FAIL!'; }

运行perl 测试代码：

osdba@osdba-laptop:~/tmp$ ./t.pl

......

35506

35507

35508

使用telnet访问memcached，查看内容：

osdba@osdba-laptop:~/tmp$ telnet 127.0.0.1 11211

Trying 127.0.0.1...

Connected to 127.0.0.1.

Escape character is '^]'.

gets test