11/08/16 17:51:29.22 発信元:124.147.108.71 0
>>500
keysコマンドに引数で"*"を指定するとすべてのキーが表示されます
あとはget（文字列型の場合）やsmember（セット型の場合）で値を取得すればおk
サンプル
my $NINJA_checkID_DB = 2; # 同一IPで使われる忍者IDを格納するDB
my $NINJA_Hamon_DB = 3; # 破門された忍者IDを格納するDB（redis上に載せる例）
my $Expire = 60*60; # 同一IPで使われる忍者IDデータの有効期限（1時間）
my $Hamon_expire = 60*60*24*90; # 破門期間（90日）
my $r = Redis->new(server => '127.0.0.1:6379', encoding => undef);
$r->auth("foobared");
$r->ping || die "no server?";
$r->select($NINJA_checkID_DB);
my @keys = $r->keys("*");
foreach my $listed_ip (@keys) {
my @listed_ninjaids = $r->smembers($listed_ip);
print "$listed_ip => @listed_ninjaids\n";
}
print "===========\n";
$r->select($NINJA_Hamon_DB);
my @keys = $r->keys("*");
foreach my $listed_ninjaid (@keys) {
my $timestamp = $r->get($listed_ninjaid);
my $ttl = $r->ttl($listed_ninjaid);
print "$listed_ninjaid: $timestamp: $ttl\n";
}
$r->quit;