Finanças :: Banco :: id :: bprks

Verifique suas contas BPR KS de Perl
Baixe Agora

Finanças :: Banco :: id :: bprks Classificação e resumo

Propaganda

  • Rating:
  • Licença:
  • Perl Artistic License
  • Preço:
  • FREE
  • Nome do editor:
  • Steven Haryanto
  • Site do editor:
  • http://search.cpan.org/~sharyanto/

Finanças :: Banco :: id :: bprks Tag


Finanças :: Banco :: id :: bprks Descrição

Finanças :: ID :: ID :: Bprks é um módulo Perl que fornece uma interface rudimentar à interface bancária on-line baseada na web do Indonésio BPR Karyajatnika Sadaya (BPR KS, Bprks) em https://ib.bprks.co. identificação. Você precisará de crypt :: Ssleay ou io :: Socket :: SSL instalado para suporte HTTPS para trabalhar (e estritamente cripta :: ssleay para ativar a verificação do certificado). Www :: mecanizar é necessário, mas você pode fornecer seu próprio objeto Mech-Like.Este módulo só pode fazer login na edição individual do site. Eu não verifiquei as outras versões.Warning: Este módulo não é oficial nem é testado para ser 100% seguro! Por causa da natureza dos robôs, tudo pode quebrar de um dia para o outro quando a interface web subjacente muda.synopsis usar finanças :: Banco :: id :: bprks; # FBI :: BPRKS usa log :: qualquer. Para mostrar logs usando, e., log4perl: use log :: log4perl qw (: fácil); usar log :: qualquer :: adaptador; LOG :: LOG4PERL-> EASY_INIT ($ DEBUG); LOG :: Qualquer :: adaptador-> Set ('log4perl'); Meu $ iBank = Finance :: Banco :: ID :: BPRKS-> NOVO (Nome de usuário => 'abcdefgh1234', # optar se apenas usando parse_statement () password => '123456', # IDEM Verify_https => 1, # Padrão é 0 #https_ca_dir => '/ etc / ssl / certs', # padrão já é / etc / ssl / certs); eval {$ ibank-> Login (); # morre em erro meus @cards = $ ibank-> list_cards (); Meu $ BAL = $ iBank-> Check_balance (cartão $); # $ card é opcional my $ stmt = $ ibank-> get_statement (cartão => ..., # opt, cartão padrão será usado se undef dias => 30, # opt start_date => datetime-> novo (ano = 2012, mês =>> 6, dia =>> 1), # opt, tem precedência sobre 'dias' end_date => datetime-> hoje, # opt, tem precedência sobre 'dias'); Imprimir "Transações:"; para o meu $ tx (@ {$ stmt -> {transacções}}) {print "$ tx -> {date} $ tx -> {quantidade} $ tx -> {description} \ n"; }}; # Lembre-se de chamar isso, caso contrário, você terá problemas para fazer login novamente # por algum tempo se ($ ibank-> logged_in) {$ ibank-> logout ()} # rotinas utilitários Meu $ res = $ ibank-> parse_statement ($ html ); Homepage do produto


Finanças :: Banco :: id :: bprks Software Relacionado