POEでmemcachedらしきものをつくってみる - akihitoのログ置き場perlのPOEを使ってmemcachedを再現してみました。 esecached.pl memcachedの偽物なので、こんな名前です。 できるのはset,get,delete,flush_allだけ。flagもexptimeも無視します（笑）。 Cache::Memcachedを騙せる事を確認しました。 POEをはじめて使ったので割とテキトーです。 動けば良いかな程度に作ってます。 use warnings; use strict; use POE; use POE::Component::Server::TCP; my $ESECACHE_DATA = {}; my $port = 11211; POE::Component::Server::TCP->new( Port => $port, ClientConnected => \&handle_client_connect, Cl
