Index: lang/perl/App-Hachero/trunk/t/plugin/analyze/02_accesscount.t
===================================================================
--- lang/perl/App-Hachero/trunk/t/plugin/analyze/02_accesscount.t (revision 19768)
+++ lang/perl/App-Hachero/trunk/t/plugin/analyze/02_accesscount.t (revision 19897)
@@ -3,4 +3,5 @@
 use Test::Base;
 use App::Hachero;
+use App::Hachero::Result;
 
 plan tests => (1 * blocks);
@@ -33,5 +34,5 @@
     $app->run_hook('parse');
     $app->run_hook('analyze');
-    my $value = (values %{$app->result->{AccessCount}->data})[0];
+    my $value = ($app->result->{AccessCount}->values)[0];
     is_deeply $value, $block->expected;
 }
