--- lib/Redis.pm 2009/03/22 18:42:21 41 +++ lib/Redis.pm 2009/03/22 20:04:17 43 @@ -258,7 +258,9 @@ sub keys { my ( $self, $glob ) = @_; - return split(/\s/, $self->_sock_result_bulk( 'KEYS', $glob )); + my $keys = $self->_sock_result_bulk( 'KEYS', $glob ); + return split(/\s/, $keys) if $keys; + return () if wantarray; } =head2 randomkey