my $rates = Finance::Bank::SCSB::TW::currency_exchange_rate; my $usd_rates = $rates->for_currency('usd');
Given a currency
$name, return a sub-set (as an arrayref) of the original exchange rate table.
For a list of currency names, see the table in this page: https://ibank.scsb.com.tw/netbank.portal?_nfpb=true&_pageLabel=page_other12&_nfls=fals
This is code for online banking, and that means your money, and that means BE CAREFUL. You are encouraged, nay, expected, to audit the source of this module yourself to reassure yourself that I am not doing anything untoward with your banking data. This software is useful to me, but is provided under NO GUARANTEE, explicit or implied.
Kang-min Liu <firstname.lastname@example.org>
Based on Finance::Bank::LloydTSB by Simon Cozens
email@example.com, and Finance::Bank::Fubon::TW by Autrijus Tang
Copyright 2003,2004,2005,2006,2007,2008,2009 by Kang-min Liu <firstname.lastname@example.org>.
This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.