Finance::Bank::Wachovia

Access account info from Perl
Download

Finance::Bank::Wachovia Ranking & Summary

Advertisement

  • Rating:
  • License:
  • Perl Artistic License
  • Price:
  • FREE
  • Publisher Name:
  • Jim Garvin
  • Publisher web site:
  • http://search.cpan.org/~jgarvin/

Finance::Bank::Wachovia Tags


Finance::Bank::Wachovia Description

Access account info from Perl Finance::Bank::Wachovia is a class that offers access account info from Perl. * Account numbers * Account names * Account balances (posted and available) * Account transaction data (in all their detailed glory)Does not (yet) provide any means to transfer money or pay bills.SYNOPSISSince this version uses the website to get account info, it will need the information to login: There are two ways to login via the wachovia website, and depending on which login method you use, that decides which parameters you'll provide to the new() method. If you use the Customer access number method (left form on the website) then provide "customer_access_number", "pin", and "code_word". If you use the user id method (right form on the website) then provide "user_id" and "password". use Finance::Bank::Wachovia; # Two different types of login information, # if you login using can/pin/codeword: my $wachovia = Finance::Bank::Wachovia->new( customer_access_number => '123456789', pin => '1234', code_word => 'blah' ) or die Finance::Bank::Wachovia->ErrStr(); # OR if you login using user_id/password: $wachovia = Finance::Bank::Wachovia->new( user_id => 'foo', password => 'bar' ) or die Finance::Bank::Wachovia->ErrStr(); my @account_numbers = $wachovia->account_numbers(); my @account_names = $wachovia->account_names(); my @account_balances = $wachovia->account_balances(); my $account = $wachovia->account( $account_numbers ) or die $wachovia->ErrStr(); print "Number: ", $account->number, " "; print "Name: ", $account->name, " "; print "Type: ", $account->type, " "; print "Avail. Bal.: ", $account->available_balance, " "; print "Posted.Bal.: ", $account->posted_balance, " "; my $transactions = $account->transactions or die $account->ErrStr; foreach my $t ( @$transactions ){ print "Date: ", $t->date, " ", "Action: ", $t->action, " ", "Desc: ", $t->description, " ", "Withdrawal", $t->withdrawal_amount, " ", "Deposit", $t->deposit_amount, " ", "Balance", $t->balance, " ", "seq_no", $t->seq_no, " ", "trans_code", $t->trans_code, " ", "check_num", $t->check_num, " "; } Internally uses WWW::Mechanize to scrape the bank's website. The idea was to keep the interface as logical as possible. The user is completely abstracted from how the data is obtained, and to a large degree so is the module itself. In case wachovia ever offers an XML interface, or soap, or DBI (right) this should be an easy module to add to/modify, but the application interface will not change, so YOUR code won't have to either. Requirements: · Perl


Finance::Bank::Wachovia Related Software