diff options
Diffstat (limited to '')
| -rw-r--r-- | lib/Net/Riak.pm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lib/Net/Riak.pm b/lib/Net/Riak.pm index 77bd773..124279f 100644 --- a/lib/Net/Riak.pm +++ b/lib/Net/Riak.pm @@ -38,7 +38,9 @@ sub bucket { my $obj = $bucket->new_object('new_post', {title => 'foo', content => 'bar'}); $obj->store; - my $obj = $bucket->get('new_post'); + $obj = $bucket->get('new_post'); + say "title for ".$obj->key." is ".$obj->data->{title}; + my $req = $client->http_request; # last request $client->http_response # last response |