Finance::Bank::Commerzbank - Check your bank accounts from Perl
use Finance::Bank::Commerzbank; for (Finance::Bank::Commerzbank->check_balance( Teilnehmernummer => $Teilnehmernummer, Kontonummer= $KtoNummer, PIN=> $PIN )) { printf ("Transaction No: %d - TradeDate: %s - Description: %s - ValueDate:%s - Amount: %s\n", $i, $_->TradeDate, $_->Description, $_->ValueDate, $_->Amount); } Finance::Bank::Commerzbank->money_transfer( Teilnehmernummer=>$Teilnehmernummer, PIN=>$PIN, EmpfaengerName=>"Fancy GMBH", EmpfaengerKto=>"8998817", EmpfaengerBLZ=>"30050000", Betrag_Eingabe=>"41,56", Verwendungszweck1=>"123123", Verwendungszweck2=>"RE 123123", Verwendungszweck3=>"Remark1", Verwendungszweck4=>"Remark2", Auftragskonto=>"133432100 EUR", TANPIN=>"123456");
This module provides a rudimentary interface to the Commerzbank online banking system at https://portal01.commerzbanking.de/P-Portal/XML/IFILPortal/pgf.html?Tab=1/. You will need either Crypt::SSLeay or IO::Socket::SSL installed for HTTPS support to work with LWP.
https://portal01.commerzbanking.de/P-Portal/XML/IFILPortal/pgf.html?Tab=1/
Crypt::SSLeay
IO::Socket::SSL
check_balance(Teilnehmernummer => $Teilnehmernummer, Kontonummer=>"133432100 EUR",PIN => $PIN)
Return a list of the last 90 days account transactions.
use Finance::Bank::Commerzbank; Finance::Bank::Commerzbank->money_transfer( Teilnehmernummer=>$Teilnehmernummer, PIN=>$PIN, EmpfaengerName=>"Fancy GMBH", EmpfaengerKto=>"8998817", EmpfaengerBLZ=>"30050000", Betrag_Eingabe=>"41,56", Verwendungszweck1=>"123123", Verwendungszweck2=>"RE 123123", Auftragskonto=>"133432100 EUR", TANPIN=>"123456"); }
Method to transfer money, you must supply all values, carefully submit the correct Auftragskonto. At the current stage this value must be provided from outside. In future versions we try to select the correct main accout.
At the current stage we protocol the temporary output from the HTML side into temporary files under the /tmp/ directory. This will be changed in future versions. You could explicit force this if you supply the debug flag to the method call. In future releases the possible Accounts should be autodetected via a new method. At the current stage you must parse the HTML output to find the correct Auftragskonto pattern.
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.
Tobias Herbert<tobi@cpan.org>
To install Finance::Bank::Commerzbank, copy and paste the appropriate command in to your terminal.
cpanm
cpanm Finance::Bank::Commerzbank
CPAN shell
perl -MCPAN -e shell install Finance::Bank::Commerzbank
For more information on module installation, please visit the detailed CPAN module installation guide.