Finance::Bank::DE::DeutscheBank is a Perl module that checks your Deutsche Bank account from Perl.
SYNOPSIS
use strict;
use Finance::Bank::DE::DeutscheBank;
my $account = Finance::Bank::DE::DeutscheBank->new(
Branch => '600',
Account => '1234567',
SubAccount => '00',
PIN => '543210',
status => sub { shift;
print join(" ", @_),"
"
if ($_[0] eq "HTTP Code")
and ($_[1] != 200)
or ($_[0] ne "HTTP Code");
},
);
# login to account
if ( $account->login() )
{
print( "successfully logged into account
" );
}
else
{
print( "error, can not log into account
" );
}
my %saldo = $account->saldo();
print("The amount of money you have is: $saldo{ 'Saldo' } $saldo{ 'Währung' }
");
# get account statement
my %parameter = (
period => 1,
StartDate => "01.01.2005",
EndDate => "02.02.2005",
);
my @account_statement = $account->account_statement(%parameter);
$account->close_session;
This module provides a rudimentary interface to the Deutsche Bank online banking system at https://meine.deutsche-bank.de/. You will need either Crypt::SSLeay or IO::Socket::SSL installed for HTTPS support to work with LWP.
The interface was cooked up by me by having a look at some other Finance::Bank modules. If you have any proposals for a change, they are welcome !
Product's homepage
Requirements:
· Perl