PerlからRedisに接続してみる。

cpanでredis検索したら、一番上にでてきたので、Redis(CPANモジュール)でやってみようと思います。

cpanm Redis
use Redis;

my $redis = Redis->new(server => 'localhost:6379');

# 入れる
$redis->set('hoge' => 'foo');

# 出す
my $hoge = $redis->get('hoge');

say $hoge;
# -> foo

とりあえず、値を入れて出しただけ。