projects
/
perl-Redis.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
select
[perl-Redis.git]
/
lib
/
Redis.pm
diff --git
a/lib/Redis.pm
b/lib/Redis.pm
index
6f3f3e6
..
14e8b8d
100644
(file)
--- a/
lib/Redis.pm
+++ b/
lib/Redis.pm
@@
-475,6
+475,19
@@
sub sinterstore {
$self->_sock_send_ok( 'SINTERSTORE', @_ );
}
$self->_sock_send_ok( 'SINTERSTORE', @_ );
}
+=head1 Multiple databases handling commands
+
+=head2 select
+
+ $r->select( 1 );
+
+=cut
+
+sub select {
+ my ($self,$index) = @_;
+ $self->_sock_send_ok( 'SELECT', $index );
+}
+
=head1 AUTHOR
Dobrica Pavlinusic, C<< <dpavlin at rot13.org> >>
=head1 AUTHOR
Dobrica Pavlinusic, C<< <dpavlin at rot13.org> >>