App-CryptoCurrencyUtils
view release on metacpan or search on metacpan
lib/App/CryptoCurrencyUtils.pm view on Meta::CPAN
eval { $cur = $cat->by_code($cur0) };
last if $cur;
eval { $cur = $cat->by_name($cur0) };
last if $cur;
warn "No such cryptocurrency code/name '$cur0'";
next CURRENCY;
}
require Browser::Open;
my $url = "https://masternodes.online/currencies/" .
URI::Escape::uri_escape($cur->{code})."/";
my $err = Browser::Open::open_browser($url);
return [500, "Can't open browser for '$url'"] if $err;
}
[200];
}
$SPEC{open_exchange_cmc} = {
v => 1.1,
summary => "Open exchange's CMC (coinmarketcap.com) exchange page in the browser",
args => {
( run in 0.987 second using v1.01-cache-2.11-cpan-c21f80fb71c )