X-Git-Url: http://git.rot13.org/?p=perl-Redis.git;a=blobdiff_plain;f=lib%2FRedis.pm;h=4fc7eea0b1cab33cd7c928e59645559323838ead;hp=36416c435e665d09b060d439937509fadcc9db38;hb=f5a339e21d14df3ad2b9377f92aa503e35ec7dcf;hpb=3957dcfecc1628ff65b686a2444765c4ebeef05b;ds=sidebyside

diff --git a/lib/Redis.pm b/lib/Redis.pm
index 36416c4..4fc7eea 100644
--- a/lib/Redis.pm
+++ b/lib/Redis.pm
@@ -536,6 +536,17 @@ sub 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> >>