Yet Another CPAN Grep

Data-MoneyCurrency ( E/ED/EDF/Data-MoneyCurrency-0.28.tar.gz, EDF, 2025; MetaCPAN )

Data-MoneyCurrency/lib/Data/MoneyCurrency.pm ( view source; MetaCPAN )

w(Exporter);
our @EXPORT_OK = qw(get_currency get_currencies_for_country);

use Carp;
use Cpanel::JSON::XS;
use Data::Dumper;
$Data::Dumper::Sortkeys = 1;
use File::ShareDir qw(dist_dir);
use Types::S

rrency_iso.json';
        open my $fh, "<:raw", $iso_path or die $!;
        my $octet_contents = join "", readline($fh);
        close $fh or die $!;
        $rh_currency_iso = decode_json($octet_con

ency_non_iso.json';
        open $fh, "<:raw", $non_iso_path or die $!;
        $octet_contents = join "", readline($fh);
        close $fh or die $!;
        my $rh_non_iso = decode_json($octet_conte