X-Git-Url: http://git.rot13.org/?p=perl-Redis.git;a=blobdiff_plain;f=lib%2FRedis.pm;h=ed5e2ad094a10e777a8d8f221e9798d38fffb234;hp=10594cd49244f21ae84d4abe2837d37e618f06a4;hb=c6feb7aa4faf446b401231c3e85f94a8d2ae3654;hpb=14f9ac6110d126004b38b292b3e7002f84519629 diff --git a/lib/Redis.pm b/lib/Redis.pm index 10594cd..ed5e2ad 100644 --- a/lib/Redis.pm +++ b/lib/Redis.pm @@ -460,6 +460,17 @@ sub sinter { $self->_sock_result_bulk_list( 'SINTER', @_ ); } +=head2 sinterstore + + my $ok = $r->sinterstore( $dstkey, $key1, $key2, ... ); + +=cut + +sub sinterstore { + my $self = shift; + $self->_sock_send_ok( 'SINTERSTORE', @_ ); +} + =head1 AUTHOR Dobrica Pavlinusic, C<< >>