projects
/
perl-Redis.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
sort
[perl-Redis.git]
/
lib
/
Redis.pm
diff --git
a/lib/Redis.pm
b/lib/Redis.pm
index
36416c4
..
4fc7eea
100644
(file)
--- a/
lib/Redis.pm
+++ b/
lib/Redis.pm
@@
-536,6
+536,17
@@
sub flushall {
$self->_sock_send_ok('flushall');
}
$self->_sock_send_ok('flushall');
}
+=head1 Sorting
+
+ $r->sort("key BY pattern LIMIT start end GET pattern ASC|DESC ALPHA');
+
+=cut
+
+sub sort {
+ my ( $self, $sort ) = @_;
+ $self->_sock_result_bulk_list( "SORT $sort" );
+}
+
=head1 AUTHOR
Dobrica Pavlinusic, C<< <dpavlin at rot13.org> >>
=head1 AUTHOR
Dobrica Pavlinusic, C<< <dpavlin at rot13.org> >>