CPAN::Groonga

currency_file";
        local $/; $DATA = <$fh>;
        $fh->close;
    }

    my $data = $self->json->decode($DATA)->{data};
    my %rows = ();

    foreach my $row(@$data) {
        my ($base, $coi