1use lib 't/lib'; 2use Test::More; 3use Test::Riak; 4 5test_riak_rest { 6 my ($client) = @_; 7 my $resp = $client->stats; 8 is ref($resp), 'HASH', 'got stats'; 9 ok exists $resp->{webmachine_version}, 'contains expected key'; 10}; 11