Finance::Bank::ID::MandiriCheck your Bank Mandiri accounts from Perl | |
Download |
Finance::Bank::ID::Mandiri Ranking & Summary
Advertisement
- License:
- Perl Artistic License
- Price:
- FREE
- Publisher Name:
- Steven Haryanto
- Publisher web site:
- http://search.cpan.org/~sharyanto/
Finance::Bank::ID::Mandiri Tags
Finance::Bank::ID::Mandiri Description
Check your Bank Mandiri accounts from Perl Finance::Bank::ID::Mandiri is a Perl module that provides a rudimentary interface to the web-based online banking interface of the Indonesian Bank Mandiri at https://ib.bankmandiri.co.id. You will need either Crypt::SSLeay or IO::Socket::SSL installed for HTTPS support to work. WWW::Mechanize is required but you can supply your own mech-like object.This module can only login to the retail/personal version of the site and not the corporate/PT/CMS version as the later requires IE. But this module can parse statement page from both versions (for CMS version, only text version is currently supported and not HTML).Warning: This module is neither offical nor is it tested to be 100% save! Because of the nature of web-robots, everything may break from one day to the other when the underlying web interface changes.SYNOPSIS use Finance::Bank::ID::Mandiri; # FBI::Mandiri uses Log4perl. the easiest way to show logs is with these 2 lines: use Log::Log4perl qw(:easy); Log::Log4perl->easy_init($DEBUG); my $ibank = Finance::Bank::ID::Mandiri->new( username => '....', # optional if you're only using parse_statement() password => '....', # idem ); eval { $ibank->login(); # dies on error my $accts = $ibank->list_accounts(); my $bal = $ibank->check_balance($acct); # $acct is optional my $stmt = $ibank->get_statement( account => ..., # opt, default account will be used if not specified days => 31, # opt start_date => DateTime->new(year=>2009, month=>10, day=>6), # opt, takes precedence over 'days' end_date => DateTime->today, # opt, takes precedence over 'days' ); print "Transactions: "; for my $tx (@{ $stmt->{transactions} }) { print "$tx->{date} $tx->{amount} $tx->{description} "; } }; # remember to call this, otherwise you will have trouble logging in again # for some time if ($ibank->logged_in) { $ibank->logout() } # utility routines my $stmt = $ibank->parse_statement($html_or_copy_pasted_text); Requirements: · Perl
Finance::Bank::ID::Mandiri Related Software