NAME

Finance::Bank::Commerzbank - Check your bank accounts from Perl

SYNOPSIS

  use Finance::Bank::Commerzbank;
  for (Finance::Bank::Commerzbank->check_balance(
        Teilnehmernummer  => $Teilnehmernummer,
        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",
   Auftragskonto=>"*522133474700;EUR;YOUR ACCOUNT/133474700 EUR",
   TANPIN=>"123456");

DESCRIPTION

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.

CLASS METHODS

check_balance(Teilnehmernummer => $u,  PIN => $m)

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=>"*522133474700;EUR;YOUR ACCOUNT/133474700 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.

TODOS

At the current stage we protocol the temporary output from the HTML side into temporary files under the /tmp/ directory. This will be =head1 WARNING

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.

AUTHOR

Tobias Herbert<tobias.herbert@herbert-consult.de>