From 7f1adb8497d63200ecebd3cf229cf240ab0eaf21 Mon Sep 17 00:00:00 2001 From: Robin Edwards Date: Fri, 1 Mar 2013 12:53:58 +0000 Subject: Fix ws --- lib/Net/Riak.pm | 24 ++++++++++++------------ 1 file changed, 12 insertions(+), 12 deletions(-) (limited to 'lib') diff --git a/lib/Net/Riak.pm b/lib/Net/Riak.pm index 1fd23a6..243244f 100644 --- a/lib/Net/Riak.pm +++ b/lib/Net/Riak.pm @@ -66,23 +66,23 @@ sub bucket { q => 'field:value' ); - # Secondary index setup (REST interface) + # Secondary index setup (REST interface) my $obj3 = $bucket->new_object('foo3', {...}); $obj3->add_index('myindex_bin','myvalue' ); $obj3->add_index('number_int', 1001); $obj3->store; - # Get all keys for a specific index/value pair - my @keys = $client->index('mybucket', 'myindex_bin', 'myvalue' ); - - # Get all keys for a range of index value pairs - my @keys = $client->index('mybucket', 'number_int', 500, 1500); - - # Removing a secondary index (REST interface) - my $new_obj = $bucket->get('foo3'); - $new_obj->remove_index('number_int', 1001); - $new_obj->store; - + # Get all keys for a specific index/value pair + my @keys = $client->index('mybucket', 'myindex_bin', 'myvalue' ); + + # Get all keys for a range of index value pairs + my @keys = $client->index('mybucket', 'number_int', 500, 1500); + + # Removing a secondary index (REST interface) + my $new_obj = $bucket->get('foo3'); + $new_obj->remove_index('number_int', 1001); + $new_obj->store; + =head1 DESCRIPTION =head2 ATTRIBUTES -- cgit v1.2.3